Como ler o conteúdo de um arquivo de texto com o VBScript

Use o VBScript para abrir e ler um arquivo de texto.

Passo 1

Execute o bloco de notas e crie um arquivo de texto. Escreva a seguinte mensagem no arquivo de texto:

Se você receber esta mensagem, você completou com sucesso este agendamento de tarefas.

Passo 2

Salve o arquivo que você acabou de criar na pasta "C: \ Temp" no seu disco rígido e coloque o nome "TextToRead.txt".

Passo 3

Crie um segundo novo documento de texto no bloco de notas.

Passo 4

Copie e cole o seguinte código no arquivo que você criou na etapa anterior:

Option Explicit

Const conForReading = 1

'Declarar variáveis Dim objFSO, objReadFile, contents

'Definir Objetos Definir objFSO = CreateObject ("Scripting.FileSystemObject") Definir objReadFile = objFSO.OpenTextFile ("C: \ Temp \ TextToRead.txt", 1, False)

'Leia o conteúdo do conteúdo do arquivo = objReadFile.ReadAll

'Fechar arquivo objReadFile.close

'Exibir resultados wscript.echo contents

'Objetos de limpeza Set objFSO = Nothing Set objReadFile = Nothing

'Saia do script WScript.Quit ()

Passo 5

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 do VBScript como "C: \ Temp \ ReadTextFile.vbs" e saia do Bloco de Notas.

Passo 6

Execute o seu VBScript, acessando a pasta "C: \ Temp" no seu disco rígido e clicando duas vezes no arquivo "ReadTextFile.vbs". A mensagem que você escreveu no arquivo de texto na etapa 1 aparecerá em uma pequena janela pop-up, confirmando que o programa VBScript conseguiu abrir e ler o arquivo. Clique em "OK".