Internet explorer не может прочитать содержимое страницы

[maxd2007]

Здравствуйте, помогите понять в чем проблема, есть такая часть кода:

Спойлер

$URL = 'http://www.garmin.com/support/WUSoftwareUpdate.jsp?req=<?xml version="1.0" encoding="UTF-8" standalone="no" ?><Requests xmlns="http://www.garmin.com/xmlschemas/UnitSoftwareUpdate/v3"><Request><PartNumber>006-B2586-00</PartNumber><TransferType>USB</TransferType><Region><RegionId>14</RegionId><Version><VersionMajor>1</VersionMajor><VersionMinor>0</VersionMinor><BuildType>Release</BuildType></Version></Region></Request></Requests>'
$oIE = _IECreate ($URL,0,0) 
if @error = 0 then
Local $sText = _IEBodyReadText($oIE)
FileWrite ( "1.txt", $sText)
endif

ссылка вроде как читается (т.к. @error выдает "0"), а содержимое ссылки не записывается в "1.txt", в windows xp (на виртуальной машине) все работает без проблем, а на windows 10 (без сторонних антивирусов, отключена родная защита и брендмауер, uac выключен), в чем может быть еще проблема?

 

[hedji]

А если так:

$URL = 'http://www.garmin.com/support/WUSoftwareUpdate.jsp?req=<?xml version="1.0" encoding="UTF-8" standalone="no" ?><Requests xmlns="http://www.garmin.com/xmlschemas/UnitSoftwareUpdate/v3"><Request><PartNumber>006-B2586-00</PartNumber><TransferType>USB</TransferType><Region><RegionId>14</RegionId><Version><VersionMajor>1</VersionMajor><VersionMinor>0</VersionMinor><BuildType>Release</BuildType></Version></Region></Request></Requests>'
$oIE = _IECreate ($URL,0,0) 
if @error = 0 then
Local $sText = _IEBodyReadText($oIE)
ConsoleWrite($sText)
FileWrite ( "C:\1.txt", $sText)
endif

+ зачем ждать открытия IE

$URL = 'http://www.garmin.com/support/WUSoftwareUpdate.jsp?req=<?xml version="1.0" encoding="UTF-8" standalone="no" ?><Requests xmlns="http://www.garmin.com/xmlschemas/UnitSoftwareUpdate/v3"><Request><PartNumber>006-B2586-00</PartNumber><TransferType>USB</TransferType><Region><RegionId>14</RegionId><Version><VersionMajor>1</VersionMajor><VersionMinor>0</VersionMinor><BuildType>Release</BuildType></Version></Region></Request></Requests>'
$text = BinaryToString(InetRead($URL, 1))
ConsoleWrite($text)
FileWrite("C:\1.txt", $text)

 

[maxd2007]

Тоже самое, но проблема точно не в пути, т.к. в моем случае фаил создается, но он пустой =(, я наверное воспользуюсь такой функцей

Спойлер

Func _getURLtext ($URL)
	$ObjNew = ObjCreate ( "winhttp.winhttprequest.5.1")
	$ObjNew.open ("GET", $URL)
	$ObjNew.send ("")
	$ObjNew.WaitForResponse
	$Text = $ObjNew.ResponseText
	Return $Text
EndFunc

единственное просто сейчас хотелось бы понять почему так происходит.


Добавлено:

Сообщение автоматически объединено: 3 Апр 2018

Странно, но Ваш второй вариант сработал, видать винда что то чудит (или internet explorer в чаcтности) =). Спасибо за участие +