WriteLine 方法
向 TextStream 文件写入指定字符串和新行字符。
object.WriteLine([string])
参数
object
必选项。应为 TextStream 对象的名称。
string
可选项。要写入文件的文本。如果省略,将向文件写入新行字符。
说明
下面例子举例说明如何使用 WriteLine 方法:
1
2
3
4
5
6
7
8
9
10
|
Function WriteLineToFile
Const ForReading = 1, ForWriting = 2
Dim fso, f
Set fso = CreateObject( "Scripting.FileSystemObject" )
Set f = fso.OpenTextFile( "c:\testfile.txt" , ForWriting, True )
f.WriteLine "嗨,你好!"
f.WriteLine "VBScript 很有趣!"
Set f = fso.OpenTextFile( "c:\testfile.txt" , ForReading)
WriteLineToFile = f.ReadAll
End Function
|