Checking the state of a Windows service.

chk-is-running.ahk

;; chk-is-running  服務名稱 系統目錄  啟動批次檔名
;; chk-is-running gitea z:\test\gitea start_service.bat
#SingleInstance Force

ServiceName = %1%    ;; "gitea"
ServiceDir = %2%  ;;"z:\test\gitea"   ;; 系統目錄
StartBat = %3%  ;;"start_service.bat"  ;; 啟動服務的批次檔

ServiceChk = sc query "%ServiceName%" > %ServiceDir%\chk-is-running.txt
runwait, %COMSPEC% /C %ServiceChk%, ,Hide  

FileRead, FileContent, %ServiceDir%\chk-is-running.txt
Loop, Parse, FileContent, `n,`r
{
FileLine = %A_LoopField%
Lookfor = STATE
  IfInString, FileLine, %LookFor%
  {
    StringGetPos, pointer, FileLine, :
    StringRight, ServerStatus, FileLine, StrLen(FileLine) - pointer - 5
    if (ServerStatus == "RUNNING") {
      FileAppend, % PID . " " . A_YYYY . "-" . A_MM . "-" . A_DD . " " . A_Hour . ":" . A_Min . ":" . A_Sec . " " . ServiceName . " is running " . " `n", %ServiceDir%\chk-is-running.log
    } else {
      Run, %ServiceDir%\%StartBat% , %ServiceDir%, Hide|UseErrorLevel, PID
      ;;MsgBox %ErrorLevel%
      FileAppend, % PID . " " . A_YYYY . "-" . A_MM . "-" . A_DD . " " . A_Hour . ":" . A_Min . ":" . A_Sec . " After net start " . ErrorLevel . " `n", %ServiceDir%\chk-is-running.log
    }        
  }
}
Return