Jak číst obsah textového souboru s VBScript

Použijte VBScript k otevření a čtení textového souboru.

Krok 1

Spusťte program Poznámkový blok a vytvořte textový soubor. V textovém souboru zadejte následující zprávu:

Pokud obdržíte tuto zprávu, úspěšně jste dokončili tento plán úkolů.

Krok 2

Uložte soubor, který jste právě vytvořili, do složky "C: \ Temp" na pevném disku a vložte název "TextToRead.txt".

Krok 3

Vytvořte nový textový dokument v programu Poznámkový blok.

Krok 4

Zkopírujte a vložte následující kód do souboru, který jste vytvořili v předchozím kroku:

Možnost explicitní

Const conForReading = 1

'Deklarace proměnných Dim objFSO, objReadFile, obsah

'Nastavit objekty Nastavit objFSO = CreateObject ("Scripting.FileSystemObject") Nastavit objReadFile = objFSO.OpenTextFile ("C: \ Temp \ TextToRead.txt", 1, False)

'Číst soubor obsah contents = objReadFile.ReadAll

'Zavřít soubor objReadFile.close

'Zobrazit výsledky wscript.echo

'Vyčištění objektů Nastavit objFSO = Nic nenastaveno objReadFile = Nic

'Ukončit skript WScript.Quit ()

Krok 5

Klikněte na "Soubor" na panelu nástrojů programu Poznámkový blok av místní nabídce vyberte možnost "Uložit". Uložte soubor s kódem VBScript jako "C: \ Temp \ ReadTextFile.vbs" a ukončete program Poznámkový blok.

Krok 6

Spusťte svůj VBScript přístup k složce "C: \ Temp" na pevném disku a poklepáním na soubor "ReadTextFile.vbs". Zpráva, kterou jste napsali v textovém souboru v kroku 1, se objeví v malém vyskakovacím okně a potvrzuje, že váš program VBScript se podařilo otevřít a přečíst soubor. Klikněte na "OK".