Esses scripts de início de sessão de amostra ilustram como gravar variáveis de ambiente em um arquivo, testar a funcionalidade de tempo limite e testar um código de saída diferente de zero.

O script Visual Basic de amostra a seguir grava todas as variáveis de ambiente fornecidas para o script em um arquivo. Você pode usar este script de exemplo para ver dados de exemplo em seu próprio ambiente. Você pode salvar esse script como 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

O script de exemplo a seguir testa a funcionalidade de tempo limite.

Option Explicit
WScript.Sleep 60000

O script de exemplo a seguir testa um código de saída diferente de zero.

Option Explicit
WScript.Quit 2