begin process at 2012 02 17 03:13:01
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Système

 > INFORMATION CARTE MERE ( CONSTRUCTEUR , MODEL ,DESCRIPTION , VERSION )

INFORMATION CARTE MERE ( CONSTRUCTEUR , MODEL ,DESCRIPTION , VERSION )


 Information sur la source

Note :
9,33 / 10 - par 3 personnes
9,33 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Système Classé sous :info, carte, mère Niveau :Initié Date de création :09/03/2005 Date de mise à jour :09/03/2005 23:27:59 Vu :18 986

Auteur : yohan49

Ecrire un message privé
Site perso
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

 Description

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.ex e
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_LogicalD isk)

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

exemple d'utilisation code 2


Source

  • '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
'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 !! :)



 Historique

09 mars 2005 23:28:00 :
nouvelle explication plus clair

 Sources du même auteur

Source avec une capture Source .NET (Dotnet) RICHTEXBOX TRANSPARENTE EN VB.NET
Source avec une capture Source .NET (Dotnet) COULEUR MIRC ET SMILEY POUR RICHTEXTBOX VB.NET 2005
Source .NET (Dotnet) CONVERTION DE L'HEURE DU TOPIC MIRC EN DATE ET HEURE
Source .NET (Dotnet) FAIRE DESCENDRE LA SCROOLBAR AUTOMATIQUEMENT EN FIN DE TEXT ...
Source .NET (Dotnet) COMMANDER UN CONTROLE SITUER UNE FORME DEPUIS UNE AUTRE FORM

 Sources de la même categorie

Source avec Zip Source avec une capture AUTORISER/REFUSER L'EXECUTION DE PROCESSUS par pierreh51
Source avec Zip Source .NET (Dotnet) CLONE/FORK DES FLUX DE LA CONSOLE : PERMETTRE LA REDIRECTION... par ShareVB
Source avec Zip Source .NET (Dotnet) DÉFRAGMENTER UN FICHIER par ShareVB
Source avec Zip Source .NET (Dotnet) ECRAN DE VEILLE : DÉTECTER LE LANCEMENT/DÉCLENCHER/EMPÊCHER par ShareVB
Source avec Zip Source avec une capture DESACTIVER / ACTIVER LES MISES EN VEILLES PC par Arsena

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture OCX DE CARTE À JOUER AVEC PLEINS DE PROPRIÉTÉS UTILES par SnkVrt
Source avec Zip Source .NET (Dotnet) PROGRAMME DE BASE VELLEMAN K8000 (VB 2005 EXPRESS EDITION) par julien76150
Source avec Zip Source avec une capture LOCALISER UNE VILLE DANS LE MONDE par rimas10
Source avec Zip Source avec une capture INFO SYSTÈME par Sinsitrus
Source avec Zip Source avec une capture Source .NET (Dotnet) USERCONTROL PERMETTANT D'AFFICHER UNE CARTE (OU N'IMPORTE QU... par preventionhs

Commentaires et avis

Commentaire de Cugel le 10/03/2005 08:55:08

Un seul mot : Nickel !

Je cherchais depuis longtemps à savoir comment fonctionnait SysInfo... Maintenant je sais.  Merci beaucoup.  En plus çà peut être utile pour plein d'autres chose (protection des softs, par exemple).

Commentaire de azerty25 le 12/03/2005 23:53:39

Tu saurai pas récuperer la température du CPU des fois ??? ... :-D

Commentaire de Vyper909 le 14/03/2005 14:44:13

Désolé, mais ca ne me retourne que des trucs du genre: "Base Board"...  :-(

Commentaire de Cugel le 14/03/2005 18:33:29

Essaies avec le listing 2 ...

Commentaire de Hnayna le 13/09/2006 11:54:44

Merci, tu m'as resolu beaucoup des problème. Merci bien.

Commentaire de Hnayna le 13/09/2006 11:58:14

Est ce que  tu peut m'aider à connaître le numèro de série de ma carte mère ?

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Détection température CPU et carte Mère [ par EDSOFT ] J'aimerais pouvoir afficher la température du CPU et de la carte mère en VB.MERCI d'avance. komen communiker avec la carte mère [ par Logan ] Ex: pour savoir la temp dur porc, la vitesse des ventilos, la version du BIOS.Merci watchdoghard et flash [ par smoron ] 'jai un programme faisant appel au watchdoghard. Avec un timer j'envoie une impulsion à la carte mère tous les n secondes. Si la carte mère ne recoit Nom de carte réseau ??? [ par gbwin ] Salut tout le monde,Voilà je fait appel à la communauté car je n'ai trouvé nul part ses info (après près de 3mois de recherche ici et ailleurs). J'ai Numéro de carte mère vide [ par makito ] Bonjour à tous, je souhaite récupérer le numéro de série de la carte, j'ai alors essayé plusieurs sources que j'ai trouvé sur le site mais soit ils me Récupération du numéro série de la carte mère [ par YPMN ] Salut! Suis butté à une difficulté grave qui se présente comme suit: Il me semble que chaque carte mère du PC à un numéro série unique (telle une pla le nimiro de serie de la carte mère [ par maanaloun ] bonjour, dans mon programe j'ai besoin d'obtenir le nimiro de serie de la carte mère! j'ai utilisé ce code dim ss as string WMI = GetObject("winmgmt detection n° de serie du BIOS ou infos de la carte mère [ par mohamed ] Bonjour chèr (es) ami(es) et joyeux noel ! et bonne et heureuse nouvelle année à tousJ'aimerais savoir si il existe une API detectant le n°de serie du récuperation du numéro du dusque dur ou la carte mère [ par khaleid ] bonjour y'a t il une possibilité de recuperer le serial du disque dur ou le numéro de la carte mère sous sisual basic ? merci d'avance.sa transmission de donnée par carte audio [ par asgard_guigui ] Et il possible avec visual basic d'utilisé la carte audio pour transmète des donnée en serie ?L'émission pouré se faire avec la sortie audio et la rec


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,123 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales