Function WriteLineToFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:/testfile.txt",2,True)
f.WriteLine "嗨,你好!"
f.WriteLine "VBScript很有趣!"
Set f = fso.OpenTextFile("c:/testfile.txt",1)
WriteLineToFile = f.ReadAll
End Function
本文介绍了一个使用VBScript进行文件写入的例子。通过创建Scripting.FileSystemObject对象,打开一个文本文件,并向其中写入两行文本。随后,再次打开同一文件并读取所有内容。
4700

被折叠的 条评论
为什么被折叠?



