Der er tidspunkter, hvor en programmør muligvis nødt til at søge og læse en tekst-fil , når du bruger VBScript. Det er muligt at udføre denne opgave ved at få adgang til Windows Script Host , via VBScript. Dette er i tillæg til at drage fordel af og udnytte FileSystemObject . Instruktioner
1
Opret en tekstfil med følgende navn og placering : Hej
"C: \\ Temp \\ TextToRead.txt "
2
Åben og køre programmet Notesblok . Klik på " Start" knappen i Windows-skrivebordet , klik på " Alle programmer " og derefter vælge " Accessories " og klik på
3
Kopier og Indsæt følgende i Notesblok " Notesblok ". :
Option Explicit
Const conForReading = 1
' Erklær variable
Dim objFSO , objReadFile , indhold
' Set Objects < br >
Set objFSO = CreateObject ( " Scripting.FileSystemObject " )
Set objReadFile = objFSO.OpenTextFile ( "C: \\ Temp \\ TextToRead.txt ", 1 , False )
' Læs filindholdet
indhold = objReadFile.ReadAll
' Close fil
objReadFile.close
' Display results
WScript.Echo indholdet
' Oprydning objekter
Set objFSO = Nothing
Set objReadFile = Nothing
' Quit script
WScript.Quit ()
Klik på " File" og vælg "Gem" i Notesblok og afslutte programmet .
4
Kør scriptet ved at dobbeltklikke på ReadTextFile.vbs VBScript -fil.
Klik på " OK" knappen i "Windows Script Host "-prompten . Du kan nu søge og læse en tekst-fil med en VBSript .