本文整理自网络,侵删。
百度屏蔽了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 getprocesshandleasname 获取进程句柄
Delphi int64:是Delphi中最大的整数,64位有符号整数
Delphi sysutils.lastdelimiter - 判断一个字符串在另一个字符串中最后出现的位置
更多相关阅读请进入《Delphi》频道 >>