Wert Remote aus Registry auslesen via VBS
Hallo,
Ich habe mich heute ein wenig in VBS eingelesen und hab folgenden Quelltext geschrieben:
Das Programm soll 2 Werte aus der Registry auslesen.
- Einmal den Computernamen
- Einmal die Secusurf Version
Das auslesen der Secusurfversion klappt ohne Probleme nur wenn ich den Code einfüge, wo er mir den Computernamen ausgeben soll da bekomm ich immer ne Fehlermeldung
und ich habe keine Ahnung woran das liegt. Wäre echt super, wenn ihr mir dabei helfen könntet sitze da nämlich shcon 1 Stunde dran und komm nicht weiter.
Habe auch noch ein Problem. Ich würde gerne, dass das VB Scribt Remote läuft und die kompletten Computer in der Domäne durchsucht nach den beiden Werten und diese dann auch in die txt schreibt.
Danke schonmal für eure Hilfe
Ich habe mich heute ein wenig in VBS eingelesen und hab folgenden Quelltext geschrieben:
Dim sKey
Dim sOrg
Dim sUser
DIm WshShell
Dim oFile
set WshShell = CreateObject("WScript.Shell")
sKey = "HKEY_LOCAL_MACHINE\SOFTWARE\Seculution\" & _
"SecuSurf\Agent\Version"
sOrg = WshShell.RegRead(sKey)
sKey = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\" & _
"Control\ComputerName\ComputerName"
sUser = WshShell.RegRead(sKey)
wscript.echo "Es ist folgende Secusurfversion installiert: " & sOrg
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFile = fso.OpenTextFile("C:\log.txt",8,true)
oFile.WriteLine " Der Computer " & sUser & " hat folgende SecuSurfversion: " & sOrg
Das Programm soll 2 Werte aus der Registry auslesen.
- Einmal den Computernamen
- Einmal die Secusurf Version
Das auslesen der Secusurfversion klappt ohne Probleme nur wenn ich den Code einfüge, wo er mir den Computernamen ausgeben soll da bekomm ich immer ne Fehlermeldung
Registrierungsschlüssel "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ComputerName\ComputerName" wurde nicht zum lesen geöffnet
und ich habe keine Ahnung woran das liegt. Wäre echt super, wenn ihr mir dabei helfen könntet sitze da nämlich shcon 1 Stunde dran und komm nicht weiter.
Habe auch noch ein Problem. Ich würde gerne, dass das VB Scribt Remote läuft und die kompletten Computer in der Domäne durchsucht nach den beiden Werten und diese dann auch in die txt schreibt.
Danke schonmal für eure Hilfe
Please also mark the comments that contributed to the solution of the article
Content-Key: 144295
Url: https://administrator.de/contentid/144295
Printed on: April 24, 2024 at 22:04 o'clock
5 Comments
Latest comment
Hallo Methleraner!
Die "Scripting Guys" haben zu sehr vielen Themen Beispiele vorrätig - in diesem Fall zwar nicht zum Lesen einer Remote-Registry, aber als Basis kannst Du diesen Artikel hoffentlich brauchen ...
Ansonsten: Working with the Registry
Grüße
bastla
Mit WMI hab ich noch nie was gemacht!
Vermutlich sollst Du es deshalb lernen ... Die "Scripting Guys" haben zu sehr vielen Themen Beispiele vorrätig - in diesem Fall zwar nicht zum Lesen einer Remote-Registry, aber als Basis kannst Du diesen Artikel hoffentlich brauchen ...
Ansonsten: Working with the Registry
Grüße
bastla