我正在Delphi中编写win32服务(应该能够翻译任何其他代码,如果你不懂delphi),需要获取网站的状态。我知道如何在.NET中执行此操作,但我不确定正常的基于Windows的编程。因此,我需要查询网站并返回状态代码200,301等。我的计划是解析返回的数据,并在我的某个网站发生故障时发送电子邮件。
有人能伸出援手吗?
编辑:这是我最后使用的代码 - 使用TIDHttp Indy组件。
IdHTTP.Get('http://www.example.com');
if IdHTTP.Connected then begin
ResponseCode := IntToStr(IdHTTP.ResponseCode);
ShowMessage(ResponseCode);
end;
答案 0 :(得分:5)
采用Indy或Synapse库(两者都是免费的,indy包含在Delphi中,synapse在google上找到)并使用他们的HTTP客户端类来完成这项工作。