Hvordan søke etter data i en fil med VB Script

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 veldig 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 lik andre programmeringsspråk som skaper, legge til, fjerne data og lese filene. Å lese og søke data 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.

Bruksanvisning

1 Start Notepad 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" ". ReadFile.txt" som Lukk filen.

2 Start Notepad og skriv følgende for å definere "File" variable og åpne filen du opprettet trinn en for å lese:

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

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

Const ForReading = 1
Dim lineNum
Dim myLineArray ()

4 Loop gjennom fildata og fylle tabellen med sin data:

i = 0
Gjør Inntil rdFile.AtEndOfStream
Redim Bevar myLineArray (i)
myLineArray (i) = rdFile.ReadLine
i = i + 1
Loop
rdFile.Close

5 Legg til følgende "For ... Loop" for å søke dataene i tabellen for antall "4" og vise en melding når det er funnet:

lineNum = 0
For hver strLine i myLineArray
Hvis (strLine = "4") og deretter

WScript.Echo "You have found " & strLine & " in line " & lineNum & "."

Slutt om
lineNum = lineNum + 1
neste

6 Trykk "Ctrl" og "S" for å starte "Lagre som" dialogvinduet. Skriv "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.