Step 1

Abra o Bloco de Notas e cole o seguinte código em um 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")

Esse código do VBScript cria um objeto "Shell" na linha 1. Note o valor do "exeName". Essa variable gravará o nome do EXE que você executará. No exemplo, há o caminho para o Bloco de Notas; e para executar um programa chamado "MusicLab.exe" dentro do diretório principal do disco "C", a sentença se veria assim:

exeName = "C:\MusicLab.exe"

Deixe por enquanto o valor do "exeName" como está. A seguinte sentença executa o comando "Run", que abre o EXE especificado na variável "exeName". O segundo parâmetro informa ao VBScript como deve aparecer a janela do EXE, ao abri-la; nesse exemplo, o "1" indica que deve ser exibida em uma janela normal. O último valor do comando "Run", "true", faz com que o programa do VBScript detenha a execução até que o EXE seja fechado. A sentença final exibirá uma caixa de mensagens, que permitirá saber que o VBScript finalizou.

Step 2

Clique no botão "Arquivo" do Bloco de Notas e em "Salvar como". A janela que aparecerá permitirá salvar o programa do VBScript.

Step 3

Digite um nome para o programa, como, por exemplo, "MeuScript", na caixa de texto "Nome do arquivo". Adicione ".vbs" ao final do nome. Digite, por exemplo, "MeuScript.vbs" (sem as aspas) e clique em "Salvar", para salvar o arquivo como um script do VBScript.

Step 4

Abra o Windows Explorer e localize o arquivo. Clique duas vezes nele. Você verá que o programa Bloco de Notas será aberto. O programa do VBScript será interrompido, pois você colocou o parâmetro "1" no comando "Run". Se houvesse colocado "0", o script continuaria.

Step 5

Feche o Bloco de Notas. O programa continuará executando e exibirá a mensagem "Fim do programa".