Win 2000 encore : processeurs

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 753 fois - Téléchargée 67 fois

Commenter

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
cool
28 mars 2001 à 20:26
coooool !
S'inscrire maintenant

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.

Du même auteur (cs_Azizo)