如何編寫計算一天中第一次運行的AutoIt腳本？

Question

什麼是應該採取當前時間的AutoIt腳本？

Answer 1

所以這裏有一些基於功能的簡單方法來做你想做的事情。好的是，這樣你就可以很好地格式化你的結果，而且它的重量輕，易於理解。

#include <Date.au3> 

Global $ini = "ini.ini" 

If _AlreadyRunToday() Then 
    MsgBox (0, "Title", _Format(_Diff())) 
Else 
    __SetTime() 
EndIf 
__SetDate() 


Func _AlreadyRunToday() ;Checks if the program run today yet 
    If IniRead($ini, "Section", "D", "") <> @MDay _ 
     Or IniRead($ini, "Section", "M", "") <> @Mon _ 
     Or IniRead($ini, "Section", "Y", "") <> @Year Then Return False 
    Return True 
EndFunc 

Func _ReadDate() ;Returns the time when the program run the first time in YYYY/MM/DD HH:MM:SS 
    Return IniRead($ini, "Section", "Y", "") & "/" & IniRead($ini, "Section", "M", "") & "/" & IniRead($ini, "Section", "D", "") & " " & IniRead($ini, "Section", "H", "") & ":" & IniRead($ini, "Section", "Mi", "") & ":" & IniRead($ini, "Section", "S", "") 
EndFunc 

Func __SetDate() ;Sets the date the program run the last time 
    IniWrite($ini, "Section", "D", @MDay) 
    IniWrite($ini, "Section", "M", @Mon) 
    IniWrite($ini, "Section", "Y", @Year) 
EndFunc 

Func __SetTime() ;Sets the time of the first instance running that day 
    IniWrite($ini, "Section", "H", @Hour) 
    IniWrite($ini, "Section", "Mi", @Min) 
    IniWrite($ini, "Section", "S", @Sec) 
EndFunc 

Func _Diff() ;Calculates the seconds passed since the first run today 
    Return _DateDiff("s", _ReadDate(), _NowCalc()) 
EndFunc 

Func _Format($Seconds) ;Turns seconds to HH:MM:SS 
    Local $h, $m, $s 
    _TicksToTime($Seconds * 1000, $h, $m, $s) 
    ;Return $h & ":" & $m & ":" & $s 
    Return StringFormat("%02d:%02d:%02d", $h, $m, $s) ;As suggested by Samoth 
EndFunc