Visual Basic Script brillerer på at automatisere simple opgaver , men når det drejer sig tid til at udføre komplekse tekst manipulation , er du nødt til at trække sig ud de store kanoner . Det regulære udtryk sproget til at søge og manipulere tekst i avancerede måder har eksisteret i årtier , og har været en del af Visual Basic script siden slutningen af 90'erne. Ved hjælp af dette sprog , kan du gå gennem hele dokumenter jage svære at finde oplysninger, såsom gyldige IP-adresser . Instruktioner
1

Åbn Notesblok (eller enhver anden almindelig tekst editor ), og indsætte følgende tekst :

"Dette er noget tekst , der indeholder IP-adresser som f.eks 194.23.14.34 og 238,12 . 43,54 . den indeholder også en falsk IP-adresse, som 493.234.534.234 , der ikke vil blive opdaget , da de ikke udgør egentlige mulige IP'er . "

Dette bruges som test tekst til scriptet. Hvis fungerer korrekt, bør scriptet afhente de to første IP'er , men ikke den sidste. IP-adresser kan indeholde tal mellem 0 og 255. . Siden den sidste bruger " 493 " og " 534 ", er det ugyldigt, og bør ikke blive opdaget af dit script .
2

Gem det med navnet " textWithIPs.txt . "
< Br . >
3

Tryk på " Ctrl -n " for at åbne et nyt dokument i Notesblok
4

Skriv følgende : Hej

dim FSO , tekstfil , tekst, IPList , re

const ForReading = 1

set re = Ny RegExp

re.Global = Sand

re.Pattern = FSO = CreateObject ( " Scripting.FileSystemObject " )

sæt textfile = FSO.OpenTextFile ( "c: \\ textWithIPs.txt " , ForReading )

text = " "

gøre, indtil textFile.atEndOfStream

text = text & textFile.readLine

loop

textFile.close

sæt IPList = re.Execute (tekst) < br >

for hver IP i IPList

MsgBox resultat

Næste

Gem det med navnet " ipExtractor.vbs ". Sørg for, at forlængelsen er " vbs " og ikke " txt ".
5

Klik på "Start " og " My Computer". Dobbeltklik på "C: \\ " " . IpExtractor.vbs " drevet og dobbeltklikke på filen Efter et kort øjeblik skulle en række besked bokse vises som indeholder alle de IP-adresser i tekstfilen , men ikke de ugyldige adresser.