Habe schon alle möglichen Variationen mit escapen und Anführungszeichen versucht, es geht so aber nicht. Hat jemand vielleicht eine Lösung?
So siehts bisher aus:
Code:
Dim ObjShell
Dim ShellObject
Set ShellObject = CreateObject("WScript.Shell")
Set ObjShell = CreateObject("WScript.Shell")
ObjShell = ShellObject.RegRead("HKEY_LOCAL_MACHINE\HARDWARE\DEVICEMAP\VIDEO\\\Device\Video1")
Registrieren
Login
