Information carte mere ( constructeur , model ,description , version )

0/5 (6 avis)

Snippet vu 22 965 fois - Téléchargée 36 fois

Contenu du snippet

Tout est dans le titre ! :)

c'est un exemple d'utilisation des instance WMI
Vous trouverez toutes les autre instance en utilisant : wbemtest.exe
C:\WINDOWS\system32\wbem\wbemtest.exe
cliquer sur la case connexion, dans la zone de test taper Root\cimv2
ensuite cliquer sur Enumérer les classe , cocher l'option Récursive , laisser la zone de texte vide et cliquer sur Ok

commencer par inserer Microsoft WMI scripting V1.2 library a votre projet

modifier le code suivant selon vos besoin :

exemple :
Set liste = GetObject("winmgmts:").InstancesOf("Win32_LogicalDisk)

pour enumerer toutes les infos sur chaque instance , utiliser le code 1 !

exemple d'utilisation code 2

Source / Exemple :


'code 1 : liste toute les information disponible par instance
Private Sub Form_Load()
Dim liste
Set liste = GetObject("winmgmts:").InstancesOf("Win32_baseboard") ' Win32_baseboard a remplacer par l'instance desirée

For Each p In liste
    MsgBox p.GetObjectText_

Next
End Sub

'code 2 : exemple de code

Private Sub Form_Load()
Dim liste
Set liste = GetObject("winmgmts:").InstancesOf("Win32_baseboard")' Win32_baseboard a remplacer par l'instance desirée

For Each p In liste
    MsgBox "  Constructeur : " & p.manufacturer
    MsgBox "  Model : " & p.Product
    MsgBox "  Version : " & p.version
    MsgBox "  Nom : " & p.Caption
    MsgBox "  Description : " & p.Description
Next
End Sub

Conclusion :


Avec ceci vous aller pouvoir creer un info systéme digne de ce nom !! :)

A voir également

Ajouter un commentaire Commentaires
cs_Hnayna Messages postés 6 Date d'inscription mardi 12 septembre 2006 Statut Membre Dernière intervention 11 avril 2007
13 sept. 2006 à 11:58
Est ce que tu peut m'aider à connaître le numèro de série de ma carte mère ?
cs_Hnayna Messages postés 6 Date d'inscription mardi 12 septembre 2006 Statut Membre Dernière intervention 11 avril 2007
13 sept. 2006 à 11:54
Merci, tu m'as resolu beaucoup des problème. Merci bien.
Cugel Messages postés 42 Date d'inscription samedi 8 mars 2003 Statut Membre Dernière intervention 27 septembre 2010
14 mars 2005 à 18:33
Essaies avec le listing 2 ...
Vyper909 Messages postés 24 Date d'inscription jeudi 27 mai 2004 Statut Membre Dernière intervention 8 janvier 2007
14 mars 2005 à 14:44
Désolé, mais ca ne me retourne que des trucs du genre: "Base Board"... :-(
cs_azerty25 Messages postés 1114 Date d'inscription jeudi 19 décembre 2002 Statut Membre Dernière intervention 6 mai 2007
12 mars 2005 à 23:53
Tu saurai pas récuperer la température du CPU des fois ??? ... :-D
Afficher les 6 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.