冥界3大法王 发表于 2023-11-24 11:40

Delphi如何判断一个网页链接是有效的?

Delphi如何判断一个网页链接是有效的?{:301_974:}
打不开,超时的,无效的,统统的剔除掉。

yushuai033X 发表于 2023-11-24 11:47

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;

冥界3大法王 发表于 2023-11-24 12:39

yushuai033X 发表于 2023-11-24 11:47
uses
IdHTTP;



不行啊,报错啊。。。



wqs12345 发表于 2023-11-24 13:35

这年代了,dephi还有人用呀

kenxy 发表于 2023-11-24 13:57

本帖最后由 kenxy 于 2023-11-24 14:00 编辑

你的是https所以就报错了

delphi调用http接口直接使用idhttp就可以了,但是调用https接口的时候就需要和IdSSLIOHandlerSocket1控件一起使用。
页: [1]
查看完整版本: Delphi如何判断一个网页链接是有效的?