#include <Encoding.au3>
$sUrl = 'https://webdav.yandex.ru/<dir>/<file.ext>'
$sLogin = '<login>'
$sPass = '<pass>'
$sToken = _Encoding_Base64Encode($sLogin &':'& $sPass)
$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'
$oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
$oHTTP.Open("GET", $sUrl, true)
$oHTTP.SetRequestHeader("User-Agent", $sUserAgent)
$oHTTP.SetRequestHeader("Authorization", 'Basic ' & $sToken)
$oHTTP.SetRequestHeader("Host", "webdav.yandex.ru")
$oHTTP.SetRequestHeader("Accept", "*/*")
;~ $oHTTP.SetRequestHeader("Accept-Language", "ru-RU,ru;q=0.8,en-US;q=0.6,en;q=0.4")
;~ $oHTTP.SetRequestHeader("Connection", "Keep-Alive")
$oHTTP.Send()
$oHTTP.WaitForResponse()
;$sHTML = $oHTTP.ResponseText()
;ConsoleWrite('> ------------------------------------ Ответ ------------------------------------ <' & @CR)
;ConsoleWrite($sHTML & @CR)
;ConsoleWrite('> ------------------------------------ Ответ ------------------------------------ <' & @CR)
;...
$hFile = FileOpen("c:\file.xxx", 18)
FileWrite($hFile, $oHTTP.ResponseBody())
FileClose($hFile)
;...
|