Проверка существования папки в интернете

Local $sUrl    = "http://xn--80abn5aat1f.pw/463211524300/"
Local $sUserAgent = 'Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10_6_7; en-US) AppleWebKit/534.16 (KHTML, like Gecko) Chrome/10.0.648.205 Safari/534.16'

Local $oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
$oHTTP.Open("GET", $sUrl, true)
$oHTTP.SetRequestHeader("User-Agent", $sUserAgent)
$oHTTP.Send()
$oHTTP.WaitForResponse()
$oHTTP.Send()
$oHTTP.WaitForResponse()

ConsoleWrite(StringFormat('! Response: (code - %d) mesage: %s\n', $oHTTP.status, $oHTTP.statusText))

Local $url = 'http://xn--80abn5aat1f.pw/463211524300/'
Local $http = ObjCreate('WinHttp.WinHttpRequest.5.1')
$http.Open("HEAD", $url)
$http.Send()
If $http.Status = 404 Then
    Exit MsgBox(0, '', 'Ресурс не существует')
EndIf