Verwenden von Systemvariablen in VB Script
Hallo zusammen,
ich stehte gerade vor folgendem Anfängerproblem ;)
Habe mir ein kleines Script zusammengebastelt, welches beim ersten Anmelden in meiner Domäne ausgeführt werden, und die XP-Tour unterbinden soll.
Hier mal der Code:
Komischerweise sagt mir der Debugger nun, dass der Pfad nicht erreichbar wäre. Kann er die Systemvariable %USERPROFILE% etwa so nicht richtig auflösen?
Hat einer ne Idee?
Gruß
LiNDi
ich stehte gerade vor folgendem Anfängerproblem ;)
Habe mir ein kleines Script zusammengebastelt, welches beim ersten Anmelden in meiner Domäne ausgeführt werden, und die XP-Tour unterbinden soll.
Hier mal der Code:
Set wmireg = GetObject("winmgmts:\\.\root\default:StdRegProv")
Set fso = CreateObject("Scripting.FileSystemObject")
Const HKLM = &H80000002
Const REG_SZ = 1
Const REG_EXPAND_SZ = 2
Const REG_BINARY = 3
Const REG_DWORD = 4
Const REG_MULTI_SZ = 7
strLogDir = "%USERPROFILE%\"
strLogFile = "xptour_run.txt"
If Not (fso.FileExists(strLogDir & strLogFile)) Then
key = "Software\Microsoft\Windows\CurrentVersion\Applets\Tour"
result = wmireg.CreateKey(HKLM, key)
result = wmireg.SetDWORDValue(HKLM, key, "RunCount", 0)
If (result = 0) Then
WScript.Echo "Schlüssel angelegt."
Else
WScript.Echo "Fehler Nr. " & result
End If
Set txtfile = fso.CreateTextFile(strLogDir & strLogFile)
txtfile.WriteLine "done"
txtfile.Close
Else
'Script ist schon mal gelaufen
End If
Komischerweise sagt mir der Debugger nun, dass der Pfad nicht erreichbar wäre. Kann er die Systemvariable %USERPROFILE% etwa so nicht richtig auflösen?
Hat einer ne Idee?
Gruß
LiNDi
Please also mark the comments that contributed to the solution of the article
Content-Key: 95617
Url: https://administrator.de/contentid/95617
Printed on: April 19, 2024 at 02:04 o'clock
4 Comments
Latest comment
Hallo,
kann sein das ich mich jetzt irre, aber muss die Systemvariable nicht erst mit environ() gesetzt werden?!
Gruß
BaBYloN
kann sein das ich mich jetzt irre, aber muss die Systemvariable nicht erst mit environ() gesetzt werden?!
Gruß
BaBYloN