VBS , også kjent som " Visual Basic Script , " forårsaket en skremme i 2000 etter at " Jeg elsker deg " virusinfiserte 15 millioner datamaskiner og brakt ned servere rundt om i verden . Når Microsoft opprettet VBS , brukte de Visual Basic som modell. VBS er ikke et virus , men det har evnen til å få tilgang til en brukers filsystem og andre IT-ressurser. Du kan bruke VBS til å lese innholdet i en fil ved å skrive noen få linjer med kode. Instruksjoner
en

Høyreklikk på skrivebordet og velg " New". Velg " Text File" fra drop -down listen. Windows vil opprette en ny tekstfil og vise ikonet på skrivebordet
2

Legg til følgende kode i dokumentet : .

Dim objFSObject , strFile , strFileContents , strCurrentLine , arrLineCollection

CONST ForReading = 1

' Create File System Object

Sett objFSObject = CreateObject ( " Scripting.FileSystemObject ")

De to første linjene lage variabler . Den tredje linje skaper et filsystem objekt
3

Legg denne koden under koden i trinn 2: .

StrFile = "C : \\ someFolder \\ someFile.txt "

Erstatt " C : \\ someFolder \\ somefile " med banen til en tekstfil på harddisken . For eksempel vil bruke en fil som heter " test.txt " ligger i " temp " -mappen på "C "-stasjonen , legg til følgende linje : en

strFile = "C : \\ temp \\ test.txt "
4

Legg denne koden under koden i trinn 3: .

strFileContents = objFSObject.OpenTextFile ( strFile , ForReading ) ReadAll

arrLineCollection = Split ( strFileContents , vbCrLf )

den første linjen leser filen og lagrer den i " strFileContents . " Den andre linjen skaper en samling ( array) og lagrer hver linje i filen som et element i matrisen . For eksempel, hvis input filen har tre linjer , vil matrisen ha tre elementer
5

Legg denne koden under koden i trinn 4: .

Hver strCurrentLine i arrLineCollection

wscript.echo " gjeldende linje = " & strCurrentLine

Neste

objFSObject.Close

Denne koden blokk looper gjennom tabellen og viser hver linje .

6

Klikk på "File " og velg "Lagre som" for å åpne " Lagre som "-vinduet .
7

Type " vbReadTest1.vbs " i " File Name" tekstboksen og klikk "Lagre". Notisblokk vil skape en VBS fil og lagre den på skrivebordet.
8

Finn filen på skrivebordet og dobbeltklikk på den . VBS koden vil lese input filen og vise innholdet .