Rufen Sie die PC-Seriennummer aus der Registrierung ab

5276
mottmoore

Ich versuche, die Seriennummer eines PCs eines Benutzers von einem VBS-Skript abzurufen und in einer msgbox anzuzeigen. Ich kenne die Methoden für die Befehlszeile (wmic bios getserialnumber) und die hardwarebasierten Methoden (z. B. das Anzeigen des Aufklebers oder der Box). Ich habe die Registrierung überprüft (HKLM \ HARDWARE \ DESCRIPTION \ System \ BIOS). umsonst. Wie kann ich VBS (ohne Aufruf einer Batchdatei) verwenden, um die Seriennummer eines Benutzers anzuzeigen?

Ich bin moreso auf der Suche nach einem Ort in der Registry für die Seriennummer, ich kann das Skript umgehen, ich muss nur wissen, wo ich suchen muss

0
Meine Seriennummer wird nirgendwo in der Registrierung angezeigt, aber der Befehl wmic ruft sie ab. Daher bellen Sie wahrscheinlich den falschen Baum an. ist das Problem, dass Sie nicht wissen, wie Sie den Aufruf "get serialnumber" von einem VBScript aus ausführen können, ohne eine cmd.exe-Instanz zu erzeugen? Frank Thomas vor 8 Jahren 0
Wenn Sie nur nach dem Weg suchen, wie Sie dies in VBScript tun können, ist der Code hier: https://support.microsoft.com/de-de/kb/558124 [Link aktualisiert] Frank Thomas vor 8 Jahren 1
@FrankThomas Das solltest du als Antwort posten. DavidPostill vor 8 Jahren 0
Umgekehrter Vorgang: Durchsuchen Sie die Registrierung mit der Seriennummer mit [RegScanner] (http://www.nirsoft.net/utils/regscanner.html). Biswapriyo vor 6 Jahren 0

1 Antwort auf die Frage

1
mottmoore

Hier finden Sie den VBScript-Code, um die Seriennummer des von Ihnen verwendeten Computers zu ermitteln:

 strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "!\\" & strComputer & "\root\cimv2")  Set colItems = objWMIService.ExecQuery( _ "SELECT * FROM Win32_ComputerSystemProduct")  For Each objItem in colItems  msgbox "This Device: " & objItem.IdentifyingNumber, vbOkayOnly, "Serial Number" Next

Dadurch wird eine Msgbox erstellt, die die Seriennummer im Standardformat anzeigt. Vielen Dank für Ihre Hilfe

Verwandte Probleme