Sisu
Programmi kirjutamisel VBScriptis võite soovida oma koodi luua, et saaksite avada ja lugeda kasutaja kõvakettal oleva tekstifaili sisu. Seda saab teha VBScript abil Windowsi skripti hostile pääsemiseks ja FileSystemObjecti kasutamiseks. Parim viis seda programmeerimistehnikat õppida on reaalne näide.
Juhised
Tekstifaili avamiseks ja lugemiseks kasutage VBScriptit (Ablestock.com/AbleStock.com/Getty Images)-
Avage Notepad ja looge tekstifail. Sisestage järgmine teade:
"Kui saite selle teate, olete selle sõiduplaaniülesande edukalt lõpetanud."
-
Salvestage fail, mille olete just loonud oma kõvakettal olevasse kausta "C: Temp", ja nimetage see "TextToRead.txt".
-
Loo uus tekstidokument Notepadis.
-
Kopeerige ja kleepige järgmine kood eelmises etapis loodud faili:
Valik Selgesõnaline
Const conForReading = 1
„Deklareerige muutujad Dim objFSO, objReadFile, sisu
'Objektide seadistamine objFSO = CreateObject ("Scripting.FileSystemObject") Set objReadFile = objFSO.OpenTextFile ("C: temp t
'Loe faili sisu sisu = objReadFile.ReadAll
'Sulge fail objReadFile.close
'Kuva tulemused wscript.echo sisu
'Puhastusobjektid Seada objFSO = Mitte midagi seada objReadFile = Miski
'Sulgege skript WScript.Quit ()
-
Klõpsake Notepad tööriistaribal nuppu "File" ja valige kontekstimenüüst "Save". Salvestage fail VBScript-koodiga "C: Temp ReadTextFile.vbs" ja seejärel sulgege Notepad.
-
Avage VBScript, liikudes kõvakettale kausta "C: Temp" ja topeltklõpsates failil "ReadTextFile.vbs". Sammu 1 tekstifailis kirjutatud sõnum ilmub väikesesse aknasse, mis kinnitab, et VBScript avati ja edukalt lugeda. Klõpsake "OK".
Kuidas
- VBScript-faili vaatamisel või redigeerimisel .vbs-laiendiga paremklõpsake failil ja valige "Edit"; vajutades hiire vasaku nupu failil avaneb see.