[環境変数を取得する]

環境変数 TEMP の値を取得します。

【ソースコード】

[tips0115.vbs]
Option Explicit
On Error Resume Next

Dim objWshShell     ' WshShell オブジェクト

Set objWshShell = WScript.CreateObject("WScript.Shell")
If Err.Number = 0 Then
    WScript.Echo objWshShell.ExpandEnvironmentStrings("%TEMP%")
Else
    WScript.Echo "エラー: " & Err.Description
End If

Set objWshShell = Nothing

【実行結果】

C:\> cscript //NoLogo tips0115.vbs
C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp