FileSystemObject通过对象操作文件目录及文本读写

t.OpenTextFile (Path, 2, 真)
t.Write (“我是第一行：写入流文本内容一会用来测试读内容” ＋ #换行符)
' >>>>> 添加5行文本，间隔一行添加一行空行
.计次循环首 (5, i)
t.WriteLine (“WriteLine >” ＋ 到文本 (i))
t.WriteBlankLines (1)
.计次循环尾 ()