$sURL = "http://videoarchive.rbc.ru/archive/2012/03/13/news1400.wmv"
$oHTTP = ObjCreate('WinHttp.WinHttpRequest.5.1')
$oHTTP.Open("HEAD",$sURL)
$oHTTP.SetRequestHeader("Accept", "*/*")
$oHTTP.SetRequestHeader("User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)")
$oHTTP.Send()
$oHTTP.WaitForResponse
$size=$oHTTP.GetResponseHeader("Content-Length")
MsgBox(0,'',$size)