XMLHTTP和“访问被拒绝”错误

Question

我试图用MS XMLHTTP COM检索HTTP文档的内容。我确实复制了下面的示例代码，但即使这样也不起作用，并且在发送方法调用时发生EOLEException错误“访问被拒绝”时失败并返回。

uses 
    MSXML, ComObj, ActiveX; 

procedure TForm1.Button1Click(Sender: TObject); 
var 
    httpDoc: XMLHTTP; // IXMLHTTPRequest 
begin 
    httpDoc := CreateOleObject('MSXML2.XMLHTTP') as XMLHTTP; 
    try 
    httpDoc.open('GET', 'http://www.google.com/index.html', False, EmptyParam, EmptyParam); 
    httpDoc.send(''); // <-- EOLEException 'Access is denied' 
    if (httpDoc.readyState = 4) and (httpDoc.status = 200) then 
     ShowMessage(httpDoc.responseText); 
    finally 
    httpDoc := nil; 
    end; 
end; 

我真的不知道我在做什么错:(

Answer 1

谷歌确实基于位置的重定向，有时是涉及重定向到另一个域。XMLHTTP不喜欢这一点。此外，它似乎XMLHTTP从本地脚本（如VB，德尔福等）在浏览器外运行时，不允许访问到远程服务器。见this discussion，this discussion和this documentation。