範例啟動工作階段指令碼

下列範例啟動工作階段指令碼說明如何將環境變數寫入檔案、測試逾時功能，以及測試非零結束代碼。

下列範例 Visual Basic 指令碼會將所有提供給指令碼的環境變數寫入檔案中。您可以使用此範例指令碼來檢視本身環境中的範例資料。您可以將此指令碼儲存為 C:\sample.vbs。

Option Explicit
Dim WshShell, FSO, outFile, strOutputFile, objUserEnv, strEnv

strOutputFile = "c:\setvars.txt"

Set FSO = CreateObject("Scripting.fileSystemObject")
Set outFile = FSO.CreateTextFile(strOutputFile, TRUE)
outFile.WriteLine("Script was called at (" & Now & ")")

Set WshShell = CreateObject( "WScript.Shell" )
Set objUserEnv = WshShell.Environment("PROCESS")
For Each strEnv In objUserEnv
outFile.WriteLine(strEnv)
Next

outFile.Close

下列範例指令碼會測試逾時功能。

Option Explicit
WScript.Sleep 60000

下列範例指令碼會測試非零結束代碼。

Option Explicit
WScript.Quit 2