IWshShell.ExpandEnvironmentStrings Property

[José Roca]

The following code expands the Windows Directory environment variable and displays it:

JScript

Code: [Select]

var WshShell = WScript.CreateObject("WScript.Shell");
WScript.Echo("WinDir is " + WshShell.ExpandEnvironmentStrings("%WinDir%"));

VBScript

Code: [Select]

set WshShell = WScript.CreateObject("WScript.Shell")
WScript.Echo "WinDir is " & WshShell.ExpandEnvironmentStrings("%WinDir%")

PowerBASIC

Code: [Select]

DIM pWsh AS IWshShell
pWsh = NEWCOM "WScript.Shell"
PRINT ACODE$(pWsh.ExpandEnvironmentStrings(UCODE$("%WinDir%")))