Att lära sig att söka efter data i en fil med VB Script kan göra dig scripting ansökan mer dynamisk . VB Script är mycket lik Visual Basic därför om du har viss erfarenhet av VB du inte har problem med VB Script . I VB Script du kan manipulera filer liknar andra programmeringsspråk som skapar , lägga till, ta bort uppgifter och läsa filer . Att läsa och söka data i en fil som du kan använda " Scripting.FileSystemObject . " När du läser informationen kan du söka efter något med hjälp av data i minnet . Instruktioner
1
Launch Anteckningar och skriv " Detta är data i min fil " och tryck på " Enter . " Typ " 1 " och tryck på " Enter . " Typ " 2 " och tryck på " Enter . " Type " 3 " och tryck på " Enter . " Type " 4 " och tryck på " Enter . " för att spara filen Type " 5 " och tryck på " Enter ". Tryck " Ctrl " och " S " . Spara den i " C : \\ Temp " som " . ReadFile.txt " Stäng filen
2
Launch Anteckningar och skriv följande för att definiera " FileSystemObject " variabel och öppna filen du skapade steg . ett för läsning :
Set fsoObj = CreateObject ( " Scripting.FileSystemObject " ) Set rdFile = fsoObj.OpenTextFile ( " C : \\ Temp \\ readFile.txt " , ForReading )
3
Skapa variabler som du använder för att söka filen :
Const ForReading = 1Dim lineNumDim myLineArray ( )
4
slinga genom filen data och fylla arrayen med sin data:
i = 0Do tills rdFile.AtEndOfStreamRedim Bevara myLineArray ( i) myLineArray (i) = rdFile.ReadLinei = i + 1LooprdFile.Close
5
Lägg till följande " för ... Loop " för att söka data i arrayen för nummer " 4 " och visar ett meddelande när det Konstaterat :
lineNum = 0For Varje strLine i myLineArrayIf ( strLine = " 4 " ) thenWScript.Echo " du har hittat " & strLine & " i linje " & lineNum & " . " End iflineNum = lineNum + 1Next
6
Tryck " Ctrl " och " S " att lansera " Spara som " dialogrutan . Typ " vbScriptFile.vbs " bredvid " . Filnamn " Spara det i " C : \\ Temp " och stäng filen . Navigera till " C : \\ Temp " . Och dubbelklicka på " vbScriptFile.vbs " för att köra programmet
