Hvordan lese innholdet i en tekstfil ved hjelp av VBScript

Hvordan lese innholdet i en tekstfil ved hjelp av VBScript


Når du skriver et program i VBScript, kan du ønsker å designe din kode slik at den kan åpne og lese innholdet i en tekstfil på brukerens harddisk. Dette kan oppnås ved å bruke VBScript å få tilgang til Windows Script Host og utnytte File. Den beste måten å lære dette programmering teknikken er fra en real-world eksempel.

Bruksanvisning

1 Start Notepad og lage en tekstfil. Skriv inn følgende melding i tekstfilen:

Hvis du får denne meldingen,
du har lykkes
fullført denne
programmering oppgave.

2 Lagre filen du nettopp opprettet til "C: \ Temp" mappe på harddisken og gi den navnet "TextToRead.txt".

3 Opprett en ny nytt tekstdokument i Notepad.

4 Kopier og lim inn følgende kode inn i filen du opprettet i foregående trinn:

Option Explicit

Const conForReading = 1

'Erklærer variablene
Dim objFSO, objReadFile, innhold

'Sett Objekter
Sett objFSO = Create ( "Scripting.FileSystemObject")
Sett objReadFile = objFSO.OpenTextFile ( "C: \ Temp \ TextToRead.txt", 1, False)

'Les filinnholdet
Innholdet = objReadFile.ReadAll

'Lukk fil
objReadFile.close

'Vis resultater
wscript.echo innhold

'Opprydding gjenstander
Sett objFSO = Nothing
Sett objReadFile = Nothing

"Quit script
WScript.Quit ()

5 Klikk "Fil" på Notepad verktøylinjen og velg "Lagre" fra kontekstmenyen. Lagre filen med VBScript kode som "C: \ Temp \ ReadTextFile.vbs" og avslutt deretter Notisblokk.

6 Kjør VBScript ved å bla til "C: \ Temp" mappe på harddisken og dobbeltklikke på "ReadTextFile.vbs" fil. Meldingen du skrev inn i tekstfilen i trinn 1 vil vises i et lite popup-vindu, som bekrefter at VBScript programmet er åpnet og lese filen. Klikk på "OK".

Hint

  • Når du viser eller redigerer en VBScript-fil med en "VBS" forlengelse, høyreklikker du på filen og velg "Edit"; venstreklikke på filen vil føre til at skriptet til å utføre.
  • Når du viser eller redigerer VBScript, må du høyreklikke på filen og velg Rediger, ellers vil du kjøre skriptet