Há momentos em que um programador pode precisar pesquisar e ler um arquivo de texto ao usar VBScript. É possível fazer esta tarefa , acessando o Windows Script Host, através de VBScript. Isto é, para além aproveitando e utilizando o FileSystemObject . Instruções
1
Crie um arquivo de texto com o seguinte nome e localização :
"C: \\ Temp \\ TextToRead.txt "
2
Aberta e executar o programa Bloco de Notas. . " Notepad" Clique no botão " Iniciar" no desktop do Windows , clique em " Todos os Programas", depois selecione "Acessórios" e clique em
3
copiar e colar o seguinte no bloco de notas :
Option Explicit
Const conForReading = 1
'Declare variáveis
Dim objFSO , objReadFile , conteúdo
' Set objetos < br > Definir
objFSO = CreateObject (" Scripting.FileSystemObject " )
Set objReadFile = objFSO.OpenTextFile ("C: \\ Temp \\ TextToRead.txt " , 1, False)
' Leia o conteúdo do arquivo
conteúdo
= objReadFile.ReadAll
" Fechar arquivo
objReadFile.close
' Mostrar resultados
wscript.echo "objetos de limpeza
Definir objFSO = Nothing
Definir objReadFile = Nothing
' conteúdo
Quit roteiro
WScript.Quit ()
Clique em "Arquivo " e selecione " Salvar" no bloco de notas e sair do programa .
4
Execute o script com um duplo clique sobre o arquivo ReadTextFile.vbs VBScript.
Clique no botão " OK" na mensagem " Windows Script Host " . Agora você pode pesquisar e ler um arquivo de texto com uma VBSript .