Delphi如何判断一个网页链接是有效的?
Delphi如何判断一个网页链接是有效的?{:301_974:}打不开,超时的,无效的,统统的剔除掉。 uses
IdHTTP;
function CheckLinkValid(const AUrl: string): Boolean;
var
IdHttp: TIdHTTP;
begin
IdHttp := TIdHTTP.Create(nil);
try
try
IdHttp.Get(AUrl);
Result := IdHttp.ResponseCode = 200;
// 或者使用下面这个语句判断状态码
// Result := IdHttp.ResponseCode in ;
except
// 请求出错时返回链接无效
Result := False;
end;
finally
IdHttp.Free;
end;
end; yushuai033X 发表于 2023-11-24 11:47
uses
IdHTTP;
不行啊,报错啊。。。
这年代了,dephi还有人用呀 本帖最后由 kenxy 于 2023-11-24 14:00 编辑
你的是https所以就报错了
delphi调用http接口直接使用idhttp就可以了,但是调用https接口的时候就需要和IdSSLIOHandlerSocket1控件一起使用。
页:
[1]