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