Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Kliknite pravým tlačidlom myši v Prieskumníkovi Windows , vyberte položku " Nový" z menu pop - up a potom kliknite na " Text dokumentu " menu pre vytvorenie textového súboru .
2
Otvorte novo vytvorený súbor pre editáciu . To bude kontajner pre všetky VBScript kódu , ktorý píšete . V každom kroku nižšie , uvidíte niekoľko riadkov kódu s prostým anglickým popisom toho , čo robia . Keď dáte všetky tieto riadky kódu spoločne , môžete skončiť s skriptu pre vytvorenie textového súboru .
3
vytvoriť premennú pre objekt systému súborov a konkretizovať ho ( nastavte do novej inštancie objektu ) . V jazyku VBScript môžete vytvoriť premenné podľa " rozmerov " im " DIM " príkazu . Komplexnej premennej ( tie , ktoré nie sú reťazce , celé čísla alebo pravdivostná hodnoty ) musí byť vytvorená pred použitím je
Skopírujte nasledujúci kód do textového súboru : . Dim objFSO " Ako FileSystemObjectSet objFSO = CreateObject ( " Scripting . FileSystemObject " )
4
Pridať reťazcové premenné pre cestu adresára , kam chcete umiestniť súbor a nastavte ju na požadované miesto .
skopírujte nasledujúci kód do vášho textu súbor : Dim strDirectory " Ako StringstrDirectory = " C : \\ NewDirectory "
5
Uistite sa , že zložka adresár existuje . Ak adresár nie je , vytvorte ho pomocou objektu systému súborov
Skopírujte nasledujúci kód do textového súboru : . Dim objDirectory " Ako OBJECTIF objFSO.FolderExists ( strDirectory ) ThenSet objDirectory = objFSO.GetFolder ( strDirectory ) ElseSet objDirectory = objFSO.CreateFolder ( strDirectory ) End If
6
Vytvorte reťazcové premenné názov súboru a nastavte ju na zodpovedajúcu hodnotu .
skopírujte nasledujúci kód do vašich textový súbor : Dim strFile " Ako StringstrFile = " NEWFILE.TXT "
7
Vytvoriť premennú textového súboru a konkretizovať ho . Metóda CreateTextFile má voliteľný parameter pre prepísanie súboru je to už existuje
Skopírujte nasledujúci kód do textového súboru : . Dim objTextFile " Ako ObjectDim blnOverwrite " Ako BooleanblnOverwrite = TrueSet objTextFile = objFSO.CreateTextFile ( strDirectory & " \\ " & strFile , blnOverwrite )
8
Zapísať dáta do novo vytvoreného súboru s kódom nižšie . Existujú dve metódy pre zápis do súborov , " Write " a " WriteLine . " Druhá metóda automaticky zahŕňa znak nového riadku pre vás , zatiaľ čo bývalý len pripojí údaje o tom , čo je už prítomný
Skopírujte nasledujúci kód do textového súboru : . ObjTextFile.Write ( " to je " ) objTextFile . Console.WriteLine ( " nový textový súbor " ) " To má za následok v reťazci " Toto je nový textový súbor "
9
Zatvorte súbor s kódom a správne uvoľniť všetky objekty .
skopírujte nasledujúci kód do textového súboru : objTextFile.CloseSet objTextFile = NothingSet objDirectory = NothingSet objFSO = Nothing
10
Uložiť všetko kódu , ktorý ste vytvorili v predchádzajúcich krokoch do textového súboru na začiatku a zatvorte súbor . Premenujte súbor " . Vbs " miesto " . Txt " pomocou kliknutia pravým tlačidlom myši na súbor a zvolením " Premenovať " z pop - up menu . Dvakrát kliknite na súbor , ktorý chcete spustiť kód .