64965

.vbs Script zum Service Tag auslesen

Hi,

ich habe bereits im Netz ein Script gefunden mit dem man sich die Service Tag Nummer in einer MsgBox ausgeben lassen kann.

Set wmiobj = GetObject("winmgmts://localhost/root/cimv2:Win32_BIOS")  
For each ver in wmiobj.Instances_
MsgBox ver.SerialNumber
Next

Ich möchte den Inhalt aber an das Ende einer Datei anhängen.
Pfad zur Datei ist: "C:\info.txt"

Kann mir jemand sgen wie das geht?

Danke
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilen

Content-ID: 114961

Url: https://administrator.de/forum/vbs-script-zum-service-tag-auslesen-114961.html

Ausgedruckt am: 28.04.2025 um 19:04 Uhr

bastla
bastla 29.04.2009 um 14:33:11 Uhr
Goto Top
Hallo cphowdy!

Etwa so:
Set wmiobj = GetObject("winmgmts://localhost/root/cimv2:Win32_BIOS")  
Set File=CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\info.txt", 8, True)  
For each ver in wmiobj.Instances_
    File.WriteLine ver.SerialNumber
Next
File.Close
Grüße
bastla
64965
64965 29.04.2009 um 15:12:08 Uhr
Goto Top
Jo, genau so!!
Herzlichen Dank!

Grüße