IXMLHttpRequest.responseXml пуст, без ошибки синтаксического анализа, когда responseText содержит действительный Xml

Яя нашел проблему

я использовал Fiddler, чтобы сохранить HTTP-ответ в текстовый файл. После этого я мог бы изменить файл ответов и указать fiddler обслуживать мои альтернативы, созданные вручную, а не переходить на исходный веб-сайт.

После 3 часов возни мне удалось отследить проблему в исходных заголовках ответа http:

HTTP/1.1 200 OK
Cache-Control: max-age=5
Connection: keep-alive
Connection: Transfer-Encoding
Date: Fri, 30 Mar 2012 14:50:50 GMT
Transfer-Encoding: chunked
Content-Type: text/html; charset=UTF-8
Expires: Fri, 30 Mar 2012 14:50:55 GMT
Server: Apache/2.2.16 (Unix) PHP/5.3.3 mod_ssl/2.2.16 OpenSSL/1.0.0d mod_perl/2.0.4 Perl/v5.12.0
X-Powered-By: PHP/5.3.3

должен быть:

HTTP/1.1 200 OK
Cache-Control: max-age=5
Connection: keep-alive
Connection: Transfer-Encoding
Date: Fri, 30 Mar 2012 14:50:50 GMT
Transfer-Encoding: chunked
Content-Type: text/xml; charset=UTF-8
Expires: Fri, 30 Mar 2012 14:50:55 GMT
Server: Apache/2.2.16 (Unix) PHP/5.3.3 mod_ssl/2.2.16 OpenSSL/1.0.0d mod_perl/2.0.4 Perl/v5.12.0
X-Powered-By: PHP/5.3.3

Как только я обнаружил проблему, я смог найти документация, объясняющая поведение:

Поддерживаемые типы MIME для MSXML 6.0:

• "текст/xml"
• "приложение/xml"
• или все, что заканчивается на "+xml", например "application/rss+xml"

RSS-канал, который я получаю, на самом деле представляет собой канал в формате определения ресурса (RDF), где Тип контента должен быть:

application/rdf+xml

Их использование:

text/html

неправильно на очень многих уровнях.

Итак, поведение, которое я испытываю, задумано; хотя и разочаровывает - так как нет простого способа узнать, является ли responseXml "действительным".

• объект responseXml будет присвоен
• объект parseError будет присвоен
• parseError.ErrorCode равно нулю
• responseXml.documentElement будет равен нулю

У меня была такая же проблема с YouTube сервисами.

Объект responseXml зависит от типа содержимого/MIME ответа.
Вы можете проверить ответ Content-Type, например: если http.getResponseHeader('Content-Type') содержит text/xml или application/xml, только тогда вы можете ссылаться на http.responseXml, в противном случае это будет пустым (см. MSDN Примечания ). Также обратите внимание, что функции проверки парсера responseXml всегда отключены по соображениям безопасности.

...
http := CoXMLHTTP60.Create; // or CoServerXmlHttpRequest.Create 
http.open('GET', szUrl, False, '', '');
http.send(EmptyParam);
Assert(http.Status = 200);

doc := CreateOleObject('Msxml2.DOMDocument.6.0') as DOMDocument60; 
doc.async := False;
doc.loadXML(http.responseText); // <- load XmlHttpRequest.responseText into DOMDocument60 and use it
Assert(doc.parseError.errorCode = 0);

// do useful things with doc object...

Ну, это работает в Delphi XE и Delphi 7:

procedure TForm1.Button1Click(Sender: TObject);
var
    szUrl: string;
    http: IXMLHTTPRequest;
    doc: {$ifndef UNICODE}WideString{$else}string{$endif};
begin
    szUrl := 'http://www.bankofcanada.ca/stats/assets/rates_rss/noon/en_all.xml';

    http := CoXMLHTTP60.Create; //or CoServerXmlHttpRequest.Create
    http.open('GET', szUrl, False, '', '');
    http.setRequestHeader('Content-Type', 'text/xml;charset=UTF-8');
    http.send(EmptyParam);

    Assert(http.Status = 200);

    doc := UTF8Encode(http.responseText);

    Memo1.Lines.text := doc;
//  ShowMessage('"'+doc.xml+'"');
end;

Надеюсь, это сработает и для вас в Delphi 5. Конечно, любые символы Юникода превратятся в ? на вас, в версиях delphi без юникода.

Вы извлекаете xml из самого объекта DOMDocument, но вместо этого вы должны захватить его из первого узла в дереве документа, например:

doc := http.responseXml as DOMDocument60; 
Assert(doc.parseError.errorCode = 0); 
ShowMessage('"' + doc.DocumentElement.childNodes.Item(0).xml + '"'); 

Собственные примеры Microsoft в документации для DOMDocument и свойства xml показывают именно такую ​​логику.