Spara text från en windows scriptfile

Permalänk
Medlem

Spara text från en windows scriptfile

Undrar om någon skulle kunna hjälpa mig med hur man bär sig åt att spara text till valfritt txt-dokument från en windows scriptfile, med andra ord VBscript.

Snabba svar uppskattas (väll alltid)!

Visa signatur

i7 920 | 12GB DDR3 | GTX 480 | GA-X58A-UD7 | 160GB SSD X25-M G2 | 1TB F3 HD103SJ | W7 64-bit | Mac Mini
Webb: bluekitestudios.com

Permalänk
Medlem

Sub Add2Log (txt) Const Myfile = "./makeinventory.txt" Const ForAppending = 8 ' Dim fso, file Set fso = CreateObject("Scripting.FileSystemObject") Set file = fso.OpenTextFile(MyFile, ForAppending, TRUE) file.WriteLine (txt) Set file = Nothing End Sub

Sen anropar du med Add2Log("textsnutt") så kommer det att sparas i den fin du angett i funktionen.

Permalänk
Medlem

Tack!

Visa signatur

i7 920 | 12GB DDR3 | GTX 480 | GA-X58A-UD7 | 160GB SSD X25-M G2 | 1TB F3 HD103SJ | W7 64-bit | Mac Mini
Webb: bluekitestudios.com