|
METHOD:
Folder.CreateTextFile
object.CreateTextFile
filename [, overwrite[, unicode]]
This method is used to create a text file and returns a TextStreamObject that can then be used to write to and read from the file.
The optional overwrite parameter returns a Boolean value - True (the default) permits overwriting of existing files while False does not. The other optional parameter, unicode, is also a Boolean. In this case, True creates a Unicode file and False (the default) creates an AscII file.
Code:
<%
dim filesys, demofolder, filetxt
Set filesys =
CreateObject("Scripting.FileSystemObject")
Set demofolder =
filesys.GetFolder("c:\projects\")
Set filetxt =
demofolder.CreateTextFile("somefile.txt",
True)
filetxt.WriteLine("Your text goes here.")
filetxt.Close
%>
|