Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako vyhľadávať dáta v súbore s VB Script

Naučiť sa vyhľadávať dáta v súbore pomocou jazyka Visual Basic Script môžete urobiť skriptovanie aplikácie dynamickejšie . VB Script je veľmi podobný Visual Basic a preto , ak máte nejaké skúsenosti vo VB nebudete mať problém pracovať s VB Script . Vo VB Script môžete manipulovať so súbormi podobné iné programovacie jazyky , ako je vytváranie , pridávanie , odoberanie dát a čítanie súborov . Ak chcete čítať a vyhľadávanie dát v súbore , môžete použiť " Scripting.FileSystemObject . " Akonáhle budete čítať dáta potom môžete hľadať na čokoľvek pomocou dát v pamäti . Pokyny dovolená 1

Spustite program Poznámkový blok a napíšte " To sú dáta v mojom súbore " a stlačte " Enter . " Typ " 1 " a stlačte " Enter . " Typ " 2 " a stlačte " Enter . " Typ " 3 " a stlačte " Enter . " Type " 4 " a stlačte " Enter . " typ " 5 " a stlačte " Enter . " Stlačte tlačidlo " Ctrl " a " S " pre uloženie súboru . Uložte ho do : " . ReadFile.txt " " C \\ Temp " ako Zatvorte súbor
2

Spustite program Poznámkový blok a zadajte nasledovné definovať " FileSystemObject " premenné a otvorte súbor , ktorý ste vytvorili krok . jeden pre čítanie :

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

3

Vytvorte premenné , ktoré budete používať pre vyhľadávanie na súbor :

Const ForReading = 1Dim lineNumDim myLineArray ( )
4

Loop v dátach súboru a vyplniť polia s údajmi :

i = 0Do Do rdFile.AtEndOfStreamRedim Zachovať myLineArray ( i ) myLineArray ( i ) = rdFile.ReadLinei = i + 1LooprdFile.Close
5

Pridajte nasledujúce " pre ... Loop " vyhľadávať dáta v poli pre číslo " 4 " a zobrazí správu , keď jeho nájdené:

LineNum = 0For Každý strLine v myLineArrayIf ( strLine = " 4 " ) thenWScript.Echo " našli ste " a strLine a " v súlade " a LineNum & " . " Koniec iflineNum = LineNum + 1Next
6

Stlačte tlačidlo " Ctrl " a " S " spustiť " Uložiť ako " dialógové okno . " . File Name " zadajte " vbScriptFile.vbs " vedľa Uložte ho do " C : \\ Temp " a zatvorte súbor . Prejdite na " C : \\ Temp " a dvakrát kliknite na " vbScriptFile.vbs " na spustenie programu
.

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené