本文整理自网络,侵删。
百度屏蔽了indy的客户端标识的 Mozilla/3.0 (compatible; Indy Library),把‘Indy Library’去掉就可以了。
try
IdHTTP1.Request.UserAgent := 'Mozilla/3.0 (compatible;)';
aStr := IdHTTP1.Get('http://www.baidu.com');
except
end;
完整的:
‘Mozilla/5.0 (compatible; MSIE 10.0; Windows NT 6.1; Trident/6.0)’
相关阅读 >>
Delphi 2009 之 tstringbuilder 类[6]: equals
Delphi xe6 android 实现base64字符串的解析
Delphi 使用钩子函数 - 钩子链和 callnexthookex 的返回值
更多相关阅读请进入《Delphi》频道 >>