anonymous
2011-04-26 12:20:55 UTC
savestring = "file's contents"
'filename = "C:\mytextfile.txt"
filename = "mytextfile.txt"
Set myFSO = CreateObject("Scripting.FileSystemObject")
Set myWrite = myFSO.OpenTextFile(filename, 2, True)
myWrite.WriteLine(savestring)
myWrite.Close
SET myWrite = NOTHING
SET myFSO = NOTHING