[求助][求助][求助]如何才能正确判断“动态域名”所指向的机子是否在线？ (50分)

假设有一个动态域名（如aaa.vicp.net），不管是否断线，用下面这段代码判断始终显示是连线状态。
请问各位~如何才能正确地判断出aaa.vicp.net的机子是否在线？？

请各们帮帮忙~谢谢谢谢~~！

//这段代码对普通网址都是有效的，只是对动态域名判断不出来
//use wininet
procedure TForm1.Button1Click(Sender: TObject);
begin
if InternetCheckConnection('http://aaa.vicp.net, 1, 0) then
edit2.text:= 'Connected'
else
edit2.text:= 'Disconnected';
end;

使用ICMP的PING组件，轻松搞定
看来真是求人不如求已~郁闷得说