BGInfo mit VBS

[HBegga]

Hi @ all,

ich nutze das BGInfo um Systeminformationen auszulesen, und diese dann auf dem Desktop darzustellen. Jetzt ist uns dabei aufgefallen, dass uns immer mal wieder die Seriennummer des Systems fehlt und diese sich doch auch gut in der Darstellung machen würde.

Da ich die Nummer weder in der Registry oder ähnlichem auslesen kann, musste ich auf´s BIOS zurückgreifen, da die Nummer dort i.d.R bei unseren Systemen hinterlegt ist. Das auslesen geht aber nur per script...da ich ja der Scripter vor dem Herren bin (ahaam) musste ich mir mit Onkel Google behelfen.

Set wmiobj = GetObject("winmgmts://localhost/root/cimv2:Win32_BIOS")

For each ver in wmiobj.Instances_

MsgBox ver.SerialNumber

Next

Das liefert mir die SN in einer MessageBox. Damit kann aber BGInfo nix anfangen, das braucht wohl nur den reinen Wert!? Kann ich dem Script auch sagen das es mir den Wert nur ausgeben soll, oder muss ich dann son gehampel mit, in Datei Speichern, Script in den Autostart etc veranstalten.

Also Ihr Sciptinggötter....ran an die Gehirnwindungen

Gruss

HBegga

[Eratum]

Pft...normalerweise hät ich gesagt: "Kein Ding mit wscript.echo oder wscript.quit(wert)" aber ich hab das mal probiert. BGInfo muckiert sich über "wscript". Mal schauen, vlt findet sich noch wat.

Zur Erklärung: wscript.echo wert -> gibt den Wert einfach aus

wscript.quit(wert) -> liefert den Rückgabewert in form des "wertes" :-P

MfG Erratum

[.vash]

Interessant in diesem Zusammenhang ist ggf. auch folgendes:

Standardkonfiguration bei Aufruf eines Skriptes ist der "wscript"-Interpreter, der eben die messagebox ausgibt. vielleicht willst Du aber die Ausgabe auf der Konsole haben, dann benutze "cscript". Man kann dies mit einem Parameter dauerhaft umestellen.

wird also der csript interpreter genutzt, dann liefert wscript.echo die rückgabe nicht mehr in einer message box sonder in der Konsole. so wie das gute alte "print" halt