WMI Hardware SN eines USB Sticks
Hy Leute,
Mein Ziel ist es in VBA(Access) die Seriennummer(Hardware SN) eines USB Sticks auszugeben. Da ich in einem Beitrag gelesen habe, das es einen WMI Code Creator gibt, hab ich mir ihn gleich gezogen.
Hier mein Code:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_DiskDrive WHERE InterfaceType = 'USB'", , 48)
For Each objItem In colItems
MsgBox (objItem.SerialNumber)
Next
Wenn ich im WMI Code Creator mir die SN anschauen will ist das Feld dort leer und die MsgBox in Access ist ebenfalls leer.
Kann mir vl wer helfen???
Mit freundlichen Grüßen
Mein Ziel ist es in VBA(Access) die Seriennummer(Hardware SN) eines USB Sticks auszugeben. Da ich in einem Beitrag gelesen habe, das es einen WMI Code Creator gibt, hab ich mir ihn gleich gezogen.
Hier mein Code:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_DiskDrive WHERE InterfaceType = 'USB'", , 48)
For Each objItem In colItems
MsgBox (objItem.SerialNumber)
Next
Wenn ich im WMI Code Creator mir die SN anschauen will ist das Feld dort leer und die MsgBox in Access ist ebenfalls leer.
Kann mir vl wer helfen???
Mit freundlichen Grüßen
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 108866
Url: https://administrator.de/forum/wmi-hardware-sn-eines-usb-sticks-108866.html
Ausgedruckt am: 09.06.2025 um 16:06 Uhr
2 Kommentare
Neuester Kommentar