VBScript, subconjunto de Visual Basic, é linguagem de programação gratuita que qualquer um pode usar para criar aplicações Windows úteis. Adicionando apenas algumas instruções a ficheiro texto ".vbs", pode escrever em ficheiros de texto e até lançar programas EXE usando comando "Run". Este comando é útil para criar atalhos para programas usados frequentemente. Desenvolvedores também usam "Run" dentro de aplicações VBScript mais complexas para lançar programas EXE externos conforme necessário.
Abra Bloco de Notas e cole o seguinte código num novo documento:
Set WshShell = WScript.CreateObject("WScript.Shell")
Dim exeName Dim statusCode
exeName = "%windir%\notepad"
statusCode = WshShell.Run (exeName, 1, true)
MsgBox("Fim do Programa")
Este código VBScript cria objeto "Shell" na linha 1. Note valor de "exeName". Esta variável guarda nome do EXE que deseja executar. Esse nome é caminho para Notepad neste exemplo. Se quisesse executar "MusicLab.exe" no disco "C", a quarta linha seria:
exeName = "C:\MusicLab.exe"
Deixe valor de "exeName" inalterado por agora. Próxima instrução executa comando "Run". Comando executa EXE especificado na variável "exeName". Segundo parâmetro, "1", diz ao VBScript como janela EXE deve aparecer ao abrir. Valor "1" faz VBScript mostrar janela normal. Valor final "true" faz programa VBScript pausar até EXE que executa fechar. Última instrução mostra caixa de mensagem a avisar que VBScript terminou.
Clique botão "Ficheiro" do Bloco de Notas, depois "Guardar Como". Janela Guardar Como abre. Permite guardar programa VBScript.
Digite nome para programa, como "MeuScript" na caixa "Nome do Ficheiro". Anexe ".vbs" ao fim. Por exemplo, se escolher "MeuScript", digite "MeuScript.vbs" (sem aspas) na caixa e clique "Guardar". Guarda ficheiro como VBScript.
Abra Explorador Windows e localize ficheiro. Faça duplo clique. Executa e abre nova instância do Notepad. Programa VBScript pausa após Notepad abrir porque passou "1" ao "Run". Se passasse 0, não pausaria.
Feche Notepad. Programa retoma execução e mostra caixa de mensagem "Fim do Programa".
Muitas vezes não interessa como janela EXE aparece ao usar VBScript para lançar. Este exemplo usa estilo "1" no "Run". Valor "1" ativa janela e exibe modo normal. Poderia passar "2" ao "Run". Número "2" diz ao VBScript para ativar janela EXE e minimizar. Existem dez estilos de janela. Cada um exibe janela EXE de forma diferente. Pode encontrar tabelas mostrando estilos em sites que discutem VBScript e parâmetro "WindowStyle".
Tecnologia Eletrônica © [www.351231.com]
