А если как-то так?у такой страницы нет свойства document, и поэтому как получить этот текст я не представляю
$sRead = InetRead('http://autoit-script.ru/index.php?type=rss;action=.xml;board=1;limit=20', 17)
If @error Then Exit 13
$sRead = BinaryToString($sRead, 4)
$aTmp = StringSplit(StringStripCR($sRead), @LF, 2)
ConsoleWrite($aTmp[0] & @LF)
$sRead = ''
$aTmp = 0
$sRead = InetRead('http://autoit-script.ru/index.php', 17)
If @error Then Exit 13
$sRead = BinaryToString($sRead, 4)
$aTmp = StringSplit(StringStripCR($sRead), @LF, 2)
ConsoleWrite($aTmp[0] & @LF)
$oXML = ObjCreate("Msxml2.DOMDocument.6.0")
$sRead = InetRead('http://autoit-script.ru/index.php?type=rss;action=.xml;board=1;limit=20', 17)
If @error Then Exit 13
$oXML.LoadXML(BinaryToString($sRead, 4))
If $oXML.ParseError.ErrorCode <> 0 Then ConsoleWrite("XML Load Error > " & $oXML.ParseError.Reason & @CR)
$sRead = InetRead('http://autoit-script.ru/index.php', 17)
If @error Then Exit 13
$oXML.LoadXML(BinaryToString($sRead, 4))
If $oXML.ParseError.ErrorCode <> 0 Then ConsoleWrite("XML Load Error > " & $oXML.ParseError.Reason & @CR)
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("HEAD", "http://autoit-script.ru/index.php?type=rss;action=.xml;board=1;limit=20")
$oHTTP.SetRequestHeader("User-Agent", "AuotIt_Script")
$oHTTP.Send("")
$oHTTP.WaitForResponse
ConsoleWrite("HTTP Content-Type:" & $oHTTP.GetResponseHeader("Content-Type") & @CR)
$oHTTP.Open("GET", "http://autoit-script.ru/index.php")
$oHTTP.SetRequestHeader("User-Agent", "AuotIt_Script")
$oHTTP.Send("")
$oHTTP.WaitForResponse
ConsoleWrite("HTTP Content-Type:" & $oHTTP.GetResponseHeader("Content-Type") & @CR)
Это ошибка выпадает только когда в LoadXML передается не XMLно возвращает ошибку XML Load Error > DTD запрещен
суть сводится к тому, что нажимается ссылка, открывается новая вкладка, соответсвенно получаю новый объект IWebBrowser2. Для простоты, тоже самое можно получить проделав _IEAttach. Дальше мне нужно узнать, что содержится. Если это XML то одно действие, если это обычный HTML документ, то другое.А можешь показать как ты получаешь код страницы?
Т.к не все серверы его правильно устанавливают. Вот, например, http://atb-andre.ucoz.ru/news/rss/
HTTP Content-Type:text/xml; charset=UTF-8
HTTP Content-Type:text/html; charset=UTF-8
$oHTTP = ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.Open("HEAD", "http://atb-andre.ucoz.ru/news/rss/")
$oHTTP.SetRequestHeader("User-Agent", "AuotIt_Script")
$oHTTP.Send("")
$oHTTP.WaitForResponse
ConsoleWrite("HTTP Content-Type:" & $oHTTP.GetResponseHeader("Content-Type") & @CR)
#include <Array.au3>
Local $aData[6][6] = [[5, 'Page', 'IP', 'First tag', 'XML?', 'Time'],['autoit-script.ru', '/index.php?type=rss;action=.xml;board=1;limit=20'],['autoit-script.ru', '/index.php'], _
['atb-andre.ucoz.ru', '/news/rss/'],['mail.ru', '/'],['news.yandex.ru', '/hardware.rss']], $iSocket
TCPStartup()
For $i = 1 To $aData[0][0]
If Not $aData[$i][2] Then $aData[$i][2] = TCPNameToIP($aData[$i][0])
$iSocket = TCPConnect($aData[$i][2], 80)
TCPSend($iSocket, 'GET ' & $aData[$i][1] & ' HTTP/1.0' & @CRLF & 'Host: ' & $aData[$i][0] & @CRLF & 'Connection: Close' & @CRLF & @CRLF)
$aData[$i][5] = TimerInit()
While TimerDiff($aData[$i][5]) < 5000
$aData[$i][3] &= TCPRecv($iSocket, 64)
If @error Then ExitLoop
If $aData[$i][3] Then
If StringRegExp($aData[$i][3], '<.+?>') Then ExitLoop
EndIf
WEnd
TCPCloseSocket($iSocket)
$aData[$i][3] = StringRegExpReplace($aData[$i][3], '(?s).+?[\r\n]{4}(<.+?>).*', '$1')
If @extended <> 1 Then $aData[$i][3] = 'Error'
$aData[$i][4] = (StringInStr($aData[$i][3], 'xml') <> 0)
$aData[$i][5] = StringFormat('%.2f msec', TimerDiff($aData[$i][5]))
Next
TCPShutdown()
$aData[0][0] = 'Host'
_ArrayDisplay($aData)