Win 2000 encore : processeurs

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

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.