ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

No de serie d'un disque   



L'auteur

lotfi072003
Algérie Algérie
Membre Simple
# 0000000489
enregistré le 20/07/2005

http://www.oasis-gestion.com
abdelatif belguidoum
Fiche personnelle


Note des membres
pas de note

Contributions > 01 - PRG : Programmation

No de serie d'un disque
# 0000000321
ajouté le 21/05/2006 01:17:11 et modifié le 21/05/2006
consulté 9160 fois
Niveau débutant

Version(s) Foxpro :
VFP 9.0
VFP 8.0
VFP 7.0
VFP 6.0
VFP 5.0
VFP 3.0
FPW 2.6
FPD 2.x

Description
Plus simple que ça tu meures...Moqueur

Je remercie Abdelatif Belguidoum qui me rapelle que je suis entrain d'oublier les commandes du DOS.

La blague,

Plus haut on me demande Débutant,Initié,Expert.

s'il y avait le bouton option Dépassé, j'aurais sélectionné cet option. Clin d'oeil
Code source :
cDrive = "c:"

MESSAGEBOX(NumroDeSerieDunDisque(cDrive),0)

FUNCTION NumroDeSerieDunDisque(cDrive)
RUN VOL &cDrive > vol.tmp
cDrive=FILETOSTR("vol.tmp")
RETURN SUBSTR(cDrive,RAT(" ",cDrive))


Commentaires
le 23/05/2006, lotfi072003 a écrit :
FILETOSTR("vol.tmp")
ca ne marche pas avec vfp5 ?

le 24/05/2006, eddymaue a écrit :
ben faudrait que tu corriges la situation et que tu indiques que c'est fonctionnelle à partir de la versiont 6
le 30/05/2006, Mike Gagnon a écrit :
Il ne faut aussi pas se tromper entre le numéro de serie d'un disque dur physique et le numéro de série d'un volume. Si un disque dur est partionné en deux partition, il vont avoir deux numéros de séries différent (un pour chaque partition). Juste a changer le titre de ta contributution à "No numéro de serie d'un volume"
Le code que tu propose me donne "A02E-DAB8" et le numéro de série de mon disque dur obtenue avec un autre méthode (Scripting)t est 1607542088 qui correspond à l'étiquette collée sur mon disque dur.
Et bien sur un disque dur a deux numéro de série que le manufacturier lui assigne, un qui est 'non-permanant' (qui peut-etre modifié avec Ghost) , et un qui est permanant qui ne peut-etre changer.

le 31/05/2006, eddymaue a écrit :
Alors comment on fait pour connaître le no de série permanant ?
le 03/06/2006, lotfi072003 a écrit :
merci abaquelinside
je ne sais pas mais je vai essayer
merci de votre comantaire
merci aussi mike gagnon de votre information c'est vrai il existe

le 03/06/2006, Mike Gagnon a écrit :
>>>Alors comment on fait pour connaître le no de série permanant ?

Avec un petit OCX appelé SysInfo
http://www.mcrgsoftware.com/sysinfo.jpg

le 04/06/2006, Mike Gagnon a écrit :
>>>Alors comment on fait pour connaître le no de série permanant ?

Item #5
http://www.atoutfox.com/articles.asp?ACTION=FCONSULTER&ID=0000000328


www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2024.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3