Contente
Ao escrever um programa no VBScript, é possível que você queira criar o seu código para que possa abrir e ler o conteúdo de um arquivo de texto no disco rígido do usuário. Isso pode ser feito usando o VBScript para acessar o Windows Script Host e utilizando o FileSystemObject. A melhor maneira de aprender esta técnica de programação é com um exemplo real.
Instruções
Use o VBScript para abrir e ler um arquivo de texto (Ablestock.com/AbleStock.com/Getty Images)-
Abra o Bloco de Notas e crie um arquivo de texto. Escreva a seguinte mensagem:
"Se você receber essa mensagem, você terá completado com êxito essa tarefa de programação."
-
Salve o arquivo que acaba de criar na pasta "C:Temp" no seu HD e nomeie-o como "TextToRead.txt".
-
Crie um novo documento de texto no Bloco de Notas.
-
Copie e cole o seguinte código no arquivo que você criou na etapa anterior:
Option Explicit
Const conForReading = 1
'Declare variables Dim objFSO, objReadFile, contents
'Set Objects Set objFSO = CreateObject("Scripting.FileSystemObject") Set objReadFile = objFSO.OpenTextFile("C:TempTextToRead.txt", 1, False)
'Read file contents contents = objReadFile.ReadAll
'Close file objReadFile.close
'Display results wscript.echo contents
'Cleanup objects Set objFSO = Nothing Set objReadFile = Nothing
'Quit script WScript.Quit()
-
Clique em "Arquivo" na barra de ferramentas do Bloco de Notas e selecione "Salvar" no menu de contexto. Salve o arquivo com o código VBScript como "C:TempReadTextFile.vbs" e então feche o Bloco de Notas.
-
Abra o VBScript navegando na pasta "C:Temp" no disco rígido e dê um clique duplo no arquivo "ReadTextFile.vbs". A mensagem escrita no arquivo de texto do passo 1 aparecerá em uma pequena janela, o que confirma que o VBScript foi aberto e lido com sucesso. Clique em "OK."
Dicas
- Ao ver ou editar um arquivo de VBScript com uma extensão ".vbs", dê um clique com o botão direito do mouse no arquivo e escolha a opção "Editar"; pressionar o botão esquerdo do mouse sobre o arquivo fará com que ele abra.