修正:
Dim fso, f
Set fso =CreateObject(“Scripting.FileSystemObject”)
Set f =fso.OpenTextFile(“C:\Users\Administrator\Desktop\1.txt”, 2, True,-1)
//-1 以 Unicode 格式打开文件。
//不存在时允许创建新文件为 True
// 2 ForWritting
// Write方法会覆盖掉原来文件中的全部内容
f.Write “哈哈”
f.Close
本文介绍如何使用VBScript中的Scripting.FileSystemObject对象来打开并写入文本文件。通过实例展示了如何以Unicode格式打开文件,并允许创建新文件。使用Write方法时要注意它会覆盖原有文件内容。
1万+

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



