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