Windows XP in a Nutshell, Second Edition

TextStream Object

The TextStream object provides powerful text file creation and manipulation abilities. To create a new TextStream object, invoke the FSO object’s CreateTextFile method:

Set objText = objFSO.CreateTextFile(strFileName, _
       [bOverwrite],[bUnicode])

The strFileName parameter identifies the new filename. The optional bOverwrite parameter will overwrite any existing files with same name if True. The default value is True. The optional bUnicode parameter will create a Unicode file if True. The default is False.

The following example creates a new text file:

Set objFSO = Wscript.CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile("C:\Data\data.txt")

Once you have created a TextStream object, you are ready to write data to it. The Write or WriteLine method will write data to the file:

objTextStream.Write(strText)
objTextStream.WriteLine(strText)

The strText parameter is the text that will be written to the file. The difference between the Write and WriteLine methods is that the WriteLine method writes an end-of-line character at the end of the line.

Whenever you are done performing operations on a TextStream object, invoke the Close method. The Close method closes the object and flushes any updates to the file.

Dim objFSO, objTextFile Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.CreateTextFile("D:\data.txt") objTextFile.WriteLine "Write a line with end of line character" objTextFile.Write "Write string without ...