举报
Dim $LogFile = 'Err.log' Func WriteLog($str);记录出错及其他异常问题,$str为你想记录的内容 Local $file = FileOpen($LogFile, 1 + 8);1追加模式打开;8不存在则创建 If $file = -1 Then msgbox(0,""," 无法打开日志文件:错误代码" & @error); EndIf $str = @YEAR & "年" & @MON & "月" & @MDAY & "日" & @HOUR & ":" & @MIN & ":" & @SEC & " " & $str FileWriteLine($file, $str) FileClose($file) EndFunc ;==>WriteLog
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-5-7 21:41 , Processed in 0.100039 second(s), 24 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.