1. //日志定义放在脚本最前面（固定）
2. 调用子程序 【日志定义】
3. //↓↓↓↓↓以下2句放在脚本适当地方就能保存为日志↓↓↓↓↓（注：[SaveString]的内容可自行修改）
4. （VBScript语句） SaveString="--->>>挂机开始"
5. 调用子程序 【保存日志】
6. //↑↑↑↑↑以上2句放在脚本适当地方就能保存为日志↑↑↑↑↑（注：[SaveString]的内容可自行修改）
7. 脚本停止运行
8. 子程序 【日志定义】
9.     （VBScript语句） Dim File,F1,SaveString,FileName
10.     //保存日志位置
11.     （VBScript语句） FileName="d:\挂机日志.ini"
12.     （VBScript语句） Set File = CreateObject("Scripting.FileSystemObject")
13.     //创建新日志(并自动替换旧日志)
14.     （VBScript语句） Set F1 =File.CreateTextFile(FileName,2)
15.     （VBScript语句） F1.Close
16. 子程序结束,回到调用处
17. 子程序 【保存日志】
18.     （VBScript语句） Set F1 =File.OpenTextFile(FileName,8)
19.     //保存日志内容
20.     （VBScript语句） F1.WriteLine(Now&SaveString)
21.     //关闭文件
22.     （VBScript语句） F1.Close
23. 子程序结束,回到调用处