mistux Site Admin
Joined: 25 Jun 2004 Posts: 1042 Location: South Bend, Indiana USA
|
Posted: Fri May 02, 2008 11:01 am Post subject: Writing String Content to End of Existing Text File |
|
|
' Writing String Content to End of Existing Text File
Const FOR_APPENDING = 8
strFileName = "C:\scripts\testfile.txt"
strContent = "sample string content"
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objTS = objFS.OpenTextFile(strFileName,FOR_APPENDING)
objTS.Write strContent |
|