Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Func _checkDate($expiry)
- Local $date, $ardate
- _HttpRequest_SetTimeout(2000)
- For $i = 1 To 3
- _HttpRequest(0, 'https://www.google.com.vn')
- If @error Then ContinueLoop
- $date = _HttpRequest_QueryHeaders(9)
- ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $date = ' & $date & @CRLF & '>Error code: ' & @error & @CRLF) ;### Debug Console
- $ardate = _GetHttpTime($date)
- If @error Or Not IsArray($ardate) Then ContinueLoop
- Return _DateDiff("D", $ardate[0] & "/" & $ardate[1] & "/" & $ardate[2], String($expiry)) > 0 ? True : False
- Next
- MsgBox(16, $title4, $text15 & @CRLF & $text16, 0, $Gui)
- Return False
- EndFunc ;==>_checkDate
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement