Windows Umgebungsvariben verwenden

Der Windows Script Host bietet eine Möglichkeit auf die "Umgebungsvariben" zuzugreifen.

Um den Pfad für das Desktip des User zu ermitteln zeigt das folgende Programmn. Die Umgebungsvariben können in der Shell (Start -> Ausführen -> cmd) mit dem Befehl SET gelistet werden.

Als BSP-User wird das Administrator-Konto verwendet.

Option Explicit

Dim WshShell
Dim sEnvironment

Const ENVIROMENTSTRING = "%Userprofile%"

Set WshShell = CreateObject("WScript.Shell")
sEnvironment = WshShell.ExpandEnvironmentStrings(ENVIROMENTSTRING)

WScript.echo ENVIROMENTSTRING & " -> " & sEnvironment

WshShell.run "explorer " & sEnvironment & "\desktop"

' Sonstige Umgebungsvariablen
' %ALLUSERSPROFILE% = C:\Dokumente und Einstellungen\All Users
' %APPDATA% = C:\Dokumente und Einstellungen\Administrator\Anwendungsdaten
' %CLIENTNAME% = Console
' %CommonProgramFiles% =C:\Programme\Gemeinsame Dateien
' %COMPUTERNAME% = LOUIS
' %ComSpec% = C:\WINDOWS\system32\cmd.exe
' %FP_NO_HOST_CHECK% = NO
' %HOMEDRIVE% = C:
' %HOMEPATH% = \Dokumente und Einstellungen\Administrator
' %LOGONSERVER% = \\LOUIS
' %NUMBER_OF_PROCESSORS% = 2
' %OS% = Windows_NT
' %Path% = C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WindowsPowerShell\v1.0
' %PATHEXT% = .COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.PSC1
' %PROCESSOR_ARCHITECTURE% = x86
' %PROCESSOR_IDENTIFIER% = x86 Family 15 Model 107 Stepping 2, AuthenticAMD
' %PROCESSOR_LEVEL% = 15
' %PROCESSOR_REVISION% = 6b02
' %ProgramFiles% = C:\Programme
' %PROMPT% = $P$G
' %SESSIONNAME% = Console
' %SystemDrive% = C:
' %SystemRoot% = C:\WINDOWS
' %TEMP% = C:\DOKUME~1\Admini~1\LOKALE~1\Temp
' %TMP% = C:\DOKUME~1\ Admini~1\LOKALE~1\Temp
' %USERDOMAIN% = LOUIS
' %USERNAME% = Michl
' %USERPROFILE% = C:\Dokumente und Einstellungen\Administrator
' %windir% = C:\WINDOWS