使用IXMLHTTPRequest获取网页源文件为什么会出错呢?(100)

J

jhddx

Unregistered / Unconfirmed
GUEST, unregistred user!
代码如下:uses MsXML, Comobj;Function GetPageHTML(inURL:String):String;var http:ixmlhttprequest; flag: bool;begin flag := false; result := ''; http:=CreateOleObject('Microsoft.XMLHTTP') as IXMLHTTPRequest; http.open('get',form1.Edit1.Text,false,'',''); http.setRequestHeader('Content-type','text/html;charset=gb2312'); http.send(''); //错误案发地点!!! while not flag do if http.status = 200 then begin result := http.responseText; flag := true; end;end; 如果获取http://www.hao123.com 能正常获取到。 但如果获取http://www.baidu.com或者其他好多页面,都会提示“系统未找到指定的资源” 请问下这是怎么回事呢?
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
顶部