PDA

Vollständige Version anzeigen : mit VBS ein Registry Wert abfragen?


VerdammtBlödeAufgabe
12.09.2005, 13:50
Wie kann ich mit VBS einen Wert aus der Registry auslesen?

Danke

VBS
13.09.2005, 07:22
Hier hast Du!

Option Explicit
On Error Resume Next

Dim objWshShell, strSchluessel, strWert

Set objWshShell = CreateObject("WScript.Shell")

strSchluessel = "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductName"
strWert = WshShell.RegRead(strSchluessel)

If Err.Number <> 0 Then
Wscript.Echo "Schlüssel ist nicht vorhanden"
End If

WScript.Echo strWert