Lære å søke etter data i en fil ved hjelp av VB Script kan gjøre deg scripting programmet mer dynamisk . VB Script er svært lik Visual Basic derfor hvis du har litt erfaring i VB du ikke vil ha et problem å jobbe med VB Script . I VB Script kan du manipulere filer ligner andre programmeringsspråk som å lage , legge til, fjerne data og lese filer. For å lese og søke i dataene i en fil du kan bruke " Scripting.FileSystemObject . " Når du lese dataene så kan du søke etter alt ved hjelp av data i minnet. Instruksjoner
en

Launch Notisblokk og skriv " Dette er data i filen min " og trykk " Enter. " Type " 1 " og trykk " Enter. " Type " 2 " og trykk " Enter. " Type " 3 " og trykk " Enter. " Type " 4 " og trykk " Enter. " Type " 5 " og trykk " Enter". Trykk " Ctrl" og " S " for å lagre filen. Lagre den i "C : \\ Temp " som " . ReadFile.txt " Lukk filen
2

Launch Notepad og skriv inn følgende for å definere " FileSystemObject " variable og åpne filen du opprettet trinn. ett for lesing : en

Set fsoObj = CreateObject ( " Scripting.FileSystemObject ") Set rdFile = fsoObj.OpenTextFile ( "C : \\ Temp \\ readFile.txt " , ForReading )

3

Lag variablene du vil bruke til å søke i filen :

Konst ForReading = 1Dim lineNumDim myLineArray ( )
4

Loop gjennom filen data og fylle matrisen med sine data : en

i = 0Do inntil rdFile.AtEndOfStreamRedim Preserve myLineArray ( i) myLineArray ( i) = rdFile.ReadLinei = i + ​​1LooprdFile.Close
5

Legg til følgende " for ... Loop "for å søke dataene i matrisen for tallet" 4 " og vise en melding når sin nyfunne : en

lineNum = 0 ° C Hver strLine i myLineArrayIf ( strLine = " 4 " ) thenWScript.Echo " du har funnet "& strLine &" på linje "& lineNum &" . " End iflineNum = lineNum + 1Next
6

Trykk" Ctrl " og" S " for å starte " Lagre som" dialogvinduet. Type " vbScriptFile.vbs " ved siden av " . File Name " Lagre den i "C : \\ Temp " og lukk filen . Naviger til "C : \\ Temp " . , Og dobbeltklikk på " vbScriptFile.vbs " for å kjøre programmet