VBS , også kendt som "Visual Basic Script, " forårsagede en forskrækkelse i 2000 efter de " Jeg elsker dig " virusinficerede 15 millioner computere, og bragt ned servere rundt omkring i verden . Når Microsoft skabte VBS , de brugte Visual Basic som model. VBS er ikke en virus , men det har evnen til at få adgang til en brugers filsystem og andre edb-ressourcer . Du kan bruge VBS til at læse indholdet af en fil ved at indtaste nogle få linjer kode. Instruktioner
1

Højreklik på skrivebordet og vælg " Ny". Vælg " Text File" fra drop- down listen. Windows vil oprette en ny tekstfil og vise dens ikon på skrivebordet
2

Føj følgende kode til dokumentet : .

Dim objFSObject , strFile , strFileContents , strCurrentLine , arrLineCollection < br >

CONST ForReading = 1

'Opret File System Object

Set objFSObject = CreateObject ( " Scripting.FileSystemObject " )

De to første linjer skaber variabler. Den tredje linje opretter et filsystem objekt
3

Tilføj denne kode under koden i trin 2: .

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

Erstat " C: \\ someFolder \\ somefile " med stien til en tekstfil på din harddisk. For eksempel , at bruge en fil med navnet " test.txt " ligger i " temp " mappe på din "C" -drevet tilføje følgende linie : Hej

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

Tilføj denne kode under koden i trin 3: .

strFileContents = objFSObject.OpenTextFile ( strFile , ForReading ) ReadAll

arrLineCollection = Split ( strFileContents , vbCrLf )

den første linje læser filen og gemmer den i " strFileContents ". Den anden linje skaber en samling ( array) og gemmer hver linje i filen som et element i array. For eksempel, hvis input -filen har tre linjer vil array have tre elementer
5

Tilføj denne kode under koden i trin 4: .

For Each strCurrentLine i arrLineCollection < br >

WScript.Echo " nuværende linje = " & strCurrentLine

Næste

objFSObject.Close

Denne kode blok sløjfer gennem array og viser hver linie . < br >
6

Klik på "File " og vælg " Gem som " for at åbne "Gem som " vinduet.
7

Type " vbReadTest1.vbs " i " File Name" tekstboksen og klik på " Gem". Notesblok vil skabe en VBS fil og gemme den på skrivebordet.
8

Find filen på skrivebordet og dobbeltklik på den. VBS -koden vil læse input -filen og vise dens indhold.