CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\Users\Administrator\Desktop\1.txt",2).Write "" 复制代码
CreateObject("Scripting.FileSystemObject").OpenTextFile("C:\Users\Administrator\Desktop\1.txt",2).Write ""