FORUMS PROFESSIONNELS
WINDEV
,
WEBDEV
et
WINDEV Mobile
Accueil
|
Messages récents
|
Connexion
|
Déconnexion
|
Français
Accueil
→
WINDEV (précédentes versions)
→
Numéro de série d'un ordinateur.
Numéro de série d'un ordinateur.
Débuté par MedRAHIMI, 22 avr. 2015 10:33 - 8 réponses
Connectez-vous…
MedRAHIMI
#1
Membre enregistré
24 messages
Popularité : +1 (1 vote)
Posté le 22 avril 2015 - 10:33
Bonjour a tous ,
Je suis en train de développer une application avec windev 19 j'ai besoin de votre aide SVP .
Est ce qu'il y pas une fonction windev ou bien un API windows pour trouver le numéro de série d'un ordinateur.
Merci.
Cordialement
Med RAHIMI
Signaler
0
0
Philippe Pasquali
#2
Membre enregistré
946 messages
Popularité : +102 (110 votes)
Posté le 22 avril 2015 - 14:48
Bonjour,
Essayez avec WMI et la classe Win32_BaseBoard
objLocator est un
objet automation
"WbemScripting.SWbemLocator"
objService est un
objet automation
dynamique
Board est un
objet automation
dynamique
objService
=
objLocator
>
>
ConnectServer
(
"."
,
"root\cimv2"
)
objService
>
>
Security_
>
>
ImpersonationLevel
=
3
Board
=
objService
>
>
ExecQuery
(
"select * from Win32_BaseBoard"
)
IF
Board
>
>
Count
>
0
THEN
Trace
(
Board
>
>
ItemIndex
(
0
)
>
>
Properties_
>
>
Item
(
"SerialNumber"
)
>
>
Value
)
Trace
(
Board
>
>
ItemIndex
(
0
)
>
>
Properties_
>
>
Item
(
"Product"
)
>
>
Value
)
Trace
(
Board
>
>
ItemIndex
(
0
)
>
>
Properties_
>
>
Item
(
"Manufacturer"
)
>
>
Value
)
END
Libérer
Board
Libérer
objService
Signaler
2
0
MedRAHIMI
#3
Membre enregistré
24 messages
Popularité : +1 (1 vote)
Posté le 22 avril 2015 - 15:38
Bonjour Philippe Merci pour votre réponse.
j'ai comparé les deux résultats :
-la commande DOS : wmic bios get serialnumber --> CNU413D0XC
-et votre code --> PDXVU001X6H2JX , sont différents !!!
Savez vous comment exécuter la commande DOS "wmic bios get serialnumber " sous windev !!!!!
Merci .
Cordialement.
Med RAHIMI
Signaler
0
0
Philippe Pasquali
#4
Membre enregistré
946 messages
Popularité : +102 (110 votes)
Posté le 22 avril 2015 - 20:44
Bonsoir
Essayez d'interroger la classe Win32_BIOS
objLocator est un
objet automation
"WbemScripting.SWbemLocator"
objService est un
objet automation
dynamique
Bios est un
objet automation
dynamique
objService
=
objLocator
>
>
ConnectServer
(
"."
,
"root\cimv2"
)
objService
>
>
Security_
>
>
ImpersonationLevel
=
3
Bios
=
objService
>
>
ExecQuery
(
"select * from Win32_BIOS"
)
IF
Bios
>
>
Count
>
0
THEN
Trace
(
Bios
>
>
ItemIndex
(
0
)
>
>
Properties_
>
>
Item
(
"SerialNumber"
)
>
>
Value
)
END
Libérer
Bios
Libérer
objService
Je ne connaissais pas cette commande mais elle fait la même chose que le code Windev, sauf que l'on ne met pas le nom complet de la classe
wmic "classe" get "membre" pour avoir le nom complet de la classe il faut juste la préfixer par "Win32_"
Ainsi wmic bios get serialnumber revient à demander le membre "serialnumber" de la classe "Win32_BIOS"
Signaler
3
0
MedRAHIMI
#5
Membre enregistré
24 messages
Popularité : +1 (1 vote)
Posté le 23 avril 2015 - 10:32
Parfait ! ça marche Bien !
Merci beaucoup Philippe .
Cordialement.
Med RAHIMI
Signaler
0
0
Devkhalid
#6
Posté le 28 janvier 2016 - 16:34
j'ai testé votre et sa marche .
Une question SVP :
Je n'arrive pas a afficher le model de mon ordinateur. vous avez une idée ?
avec CMD :: wmic csproduct get name, identifyingnumber sa marche
Comment faire avec Windev ?
Merci
Signaler
0
0
Oukpedjo
#7
Posté le 29 octobre 2018 - 22:37
Bonsoir , merci pour votre code pour afficher le numeraux de serie
Mais je voudrais maintenant recuperer le numeraux dans un variable pour mon traitement svp priere de maider
Signaler
0
0
Kodjo KOUMAGNA
#8
Membre enregistré
1 message
Posté le 07 novembre 2019 - 14:52
Merci Phillipe pour votre code mais je l'ai essayé sur Windows xp et n'a pas marché
Message modifié, 07 novembre 2019 - 14:53
Signaler
0
0
Louis Albert
#9
Membre enregistré
7 messages
Posté le 26 juillet 2022 - 15:21
Bonjour Philippe,
Encore un grand Merci 🙏🏼🙏🏼🙏🏼🙏🏼🙏🏼🙏🏼
Signaler
0
0
→ Revenir à WINDEV (précédentes versions)
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (précédentes versions)
WEBDEV (précédentes versions)
WINDEV Mobile (précédentes versions)
Etats & Requêtes
Hors-sujet
Outils
Français
English
Español
Portuguesa
Fermer cette fenêtre
Type de recherche
Uniquement les sujets
Tous les messages
Période de recherche
Date indifférente
Moins d'une heure
Moins de 24 heures
Moins d'une semaine
Moins d'un mois
Moins d'un an
Annuler
Aperçu de votre message
Ajouter une image
Importer une image depuis une URL
Envoyer une image depuis un fichier de votre disque
Déposez ici un fichier ou cliquez sur "Parcourir..."
ou
Annuler
0%
WLangage
SQL
XML, HTML
JAVA, Javascript
Texte