Question

如何用VBS 创建文本文件

可不可以用VBS 在D:\ 下创建文本文件,内容如下:

时间扔带我们匆匆前行
走过一段又一段的落寞
像是沙漠里摇曳的枯树
注定了那样的孤独
我只想请时间可不可以放慢脚步
可以让我走出那片困扰自己的迷途
可是，
我没有想过要忘记

Answer 1

Dim fso
content="时间扔带我们匆匆前行 走过一段又一段的落寞 像是沙漠里摇曳的枯树 注定了那样的孤独 我只想请时间可不可以放慢脚步 可以让我走出那片困扰自己的迷途 可是， 我没有想过要忘记"
Set fso = CreateObject("scripting.filesystemobject")
Set myfile=fso.CreateTextFile( "d:\文件.txt",,ture)
str=Split(content," ")
content=""
For Each i In str
myfile.WriteLine i
Next
myfile.Close