Win 2000 encore : processeurs

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 632 fois - Téléchargée 66 fois

Contenu du snippet

Compatibilité : Win2000 uniquement

Creer un fichier avec extention VBS , mettez ce code dedans, puis double cliquez (ou executer) ce fichier depuis l'environnement Windows.

Ce code permet de voir les processeurs en cours sous Win2000

Bon courage.

Source / Exemple :


Dim p, liste
Dim s
s = ""

Set liste =  GetObject("winmgmts:").InstancesOf("Win32_Processor")
for each p in liste
  s = s & vbCRLF & "  Nom : "                  & p.Name
  s = s & vbCRLF & "  Architecture : "      & p.Architecture
  s = s & vbCRLF & "  ProcessorType : "      & p.ProcessorType
  s = s & vbCRLF & "  Role  : "      & p.Role
  s = s & vbCRLF & "  MaxClockSpeed : "      & p.MaxClockSpeed
  s = s & vbCRLF & "  CurrentVoltage : "      & p.CurrentVoltage
  s = s & vbCRLF & "  Description : "          & p.Description
  s = s & vbCRLF & "  L2CacheSize : "          & p.L2CacheSize
  s = s & vbCRLF & "  L2CacheSpeed : "          & p.L2CacheSpeed
  s = s & vbCRLF & "  Manufacturer : "      & p.Manufacturer
   s = s & vbCRLF
  
next

MsgBox s

Conclusion :


Hihi

A voir également

Ajouter un commentaire Commentaires
clements0
Messages postés
5
Date d'inscription
dimanche 19 février 2012
Statut
Membre
Dernière intervention
25 mai 2012

24 févr. 2012 à 18:41
Cela marche aussi sous XP
cs_SHIVA
Messages postés
97
Date d'inscription
vendredi 28 décembre 2001
Statut
Membre
Dernière intervention
1 décembre 2003

15 juin 2002 à 13:49
SUPER
coooool !

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.