先在vbs顶部输入以下代码:
Const LOG_FILE_PATH = "info.txt"
然后在底部输入如下代码:
Private Sub WriteLog(Body)
Dim FSO,Txt
Set FSO = WScript.CreateObject("Scripting.FileSystemObject")
Set Txt = FSO.OpenTextFile(LOG_FILE_PATH,8,True)
Txt.WriteLine(Body)
Txt.Close
End Sub
配置完成后,你就可以在需要写运行过程的地方调用WriteLog "内容"即可.