| |
[日志文件]自动保存在D盘下名字为[挂机日志.ini] ,使用[记事本]打开查看 。
用于保存脚本运行状态。使得容易找出脚本问题,哈哈。
[General]
Description=保存日志(精简版1.0)
BeginHotkey=120
beginHotkeyMod=0
RunOnce=1
Enable=1
[Repeat]
Type=0
Number=1
[Comment]
Content=
[Script]
//日志定义放在脚本最前面(固定)
Gosub 【日志定义】
//↓↓↓↓↓以下2句放在脚本适当地方就能保存为日志↓↓↓↓↓(注:[SaveString]的内容可自行修改)
VBS SaveString="--->>>挂机开始"
Gosub 【保存日志】
//↑↑↑↑↑以上2句放在脚本适当地方就能保存为日志↑↑↑↑↑(注:[SaveString]的内容可自行修改)
EndScript
Sub 【日志定义】
VBS Dim File,F1,SaveString,FileName
//保存日志位置
VBS FileName="d:\挂机日志.ini"
VBS Set File = CreateObject("Scripting.FileSystemObject")
//创建新日志(并自动替换旧日志)
VBS Set F1 =File.CreateTextFile(FileName,2)
VBS F1.Close
Return 【日志定义】
Sub 【保存日志】
VBS Set F1 =File.OpenTextFile(FileName,8)
//保存日志内容
VBS F1.WriteLine(Now&SaveString)
//关闭文件
VBS F1.Close
Return 【保存日志】 |
|