O texto em verde é onde você deve alterar com as informações desejadas
O código:_________________________________
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "Local do arquivo desejado"
objShell.ShellExecute "Local do arquivo desejado"
A execução:_________________________________
1 - Abra o bloco de notas
2 - Copie e cole o código abaixo:
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "C:\Cod_vbscript\primeiro.txt"
objShell.ShellExecute "C:\Cod_vbscript\primeiro.txt"
3 - Salve o arquivo com o nome abrir_doc.vbs na area de trabalho OBS.: Não esqueça de colocar o .vbs
4 - Clique sobre o ícone com o nome abrir_doc
Nenhum comentário:
Postar um comentário