Code: Alles auswählen
Function CpuID()
Dim oWMI, oCpu
Set oWMI = GetObject("winmgmts:")
For Each oCpu in oWMI.InstancesOf("Win32_Processor")
wscript.echo "Hersteller: " & oCPU.Manufacturer & " - CPU Name: " & oCpu.Name & " - MHz: " & oCPU.MaxClockSpeed & " - FSB:" & oCPU.ExtClock & " - L2-Cache Größe:" & oCPU.L2CacheSize
Next
End Function
CpuID
Zum Testen des Scriptes einfach eine neue Textdatei erstellen, den Code reinkopieren und als test.vbs speichern.
Memo an mich selbst : "wmic" auf Kommandozeile, dann "cpu /?" für Hilfe.