At lære at søge efter data i en fil ved hjælp af VB Script kan gøre dig scripting ansøgning mere dynamisk. VB Script er meget lig Visual Basic derfor hvis du har nogle erfaringer i VB vil du ikke have et problem med VB Script . I VB Script du kan manipulere filer ligner andre programmeringssprog såsom at oprette , tilføje, fjerne data og læse filerne. For at læse og søge i data i en fil, som du kan bruge " Scripting.FileSystemObject ". Når du læse data , så du kan søge efter noget hjælp af dataene i hukommelsen. Instruktioner
1
Launch Notepad og skriv "Dette er data i min fil " og tryk "Enter". Type " 1" og tryk på " Enter. " Type "2 " og tryk "Enter". Type "3" og trykke på " Enter. " Type " 4" og trykke på " Enter. " Type "5 " og tryk "Enter". Tryk på " Ctrl " og "S " for at gemme filen. Gemme det i "C: \\ Temp" som " . ReadFile.txt " Luk filen
2
Launch Notepad og skriv følgende for at definere " FileSystemObject " variable og åbn den fil, du oprettede trin. én for læsning : Hej
Set fsoObj = CreateObject ( " Scripting.FileSystemObject " ) Set rdFile = fsoObj.OpenTextFile ( "C: \\ Temp \\ readFile.txt " , ForReading )
< br > 3
Opret de variabler, du vil bruge til at søge i filen :
Const ForReading = 1Dim lineNumDim myLineArray ()
4
Loop gennem fildataene og fylde array med sine data : Hej
i = 0Do Indtil rdFile.AtEndOfStreamRedim Preserve myLineArray ( i) myLineArray (i) = rdFile.ReadLinei = i + 1LooprdFile.Close
5
Tilføj følgende " for ... Loop "for at søge data i array for nummer" 4 "og vise en meddelelse , når dens found : Hej
lineNum = 0For Hver strLine i myLineArrayIf ( strLine =" 4 " ) thenWScript.Echo " du har fundet "& strLine &" på linje "& lineNum &" . "Slut iflineNum = lineNum + 1Next
6
Tryk på" Ctrl "og" S " at lancere den "Gem som " dialog -vinduet. Type " vbScriptFile.vbs " ved siden af " . Filnavn " Gem i "C: \\ Temp ", og lukke filen. Naviger til "C: \\ Temp" . Og dobbelt -klik " vbScriptFile.vbs " for at køre programmet