谢谢 神仙和tiny现在发现只用ping判断还不行，因为如果对方装了防火墙的话，也一样ping不通， 但是它却有可能提供http或ftp服务的！ 不好意思，我还是先说说我的程序吧，不然有点乱。某机器若提供http、ftp服务，则用winsock和Inet控件将其内容下载：......'调用了connect后，再判断它的状态Winsock1.RemoteHost = ip Winsock1.RemotePort = 80 Winsock1.Connect url="http://"+ip If Winsock1.State = sckConnecting Then str = Inet1.OpenURL(url)‘inet1是已建立的Internet Transfer Control Winsock1.Close End If现在情况是：如果ip提供了http服务，工作很快完成。但如果没有这些服务，ping也 ping不通的话，就惨了，要1－2分钟才结束:( 可我不希望这样， 怎么办，不知各位大侠有何高招？谢谢! 我一定加分（不过我自己也很可怜，分数不多，请大侠们谅解！）
或者使用INTERNETAPI的API函数自己PING(MSDN里有),可以自己设定超时时间秒数.
但是它却有可能提供http或ftp服务的！
不好意思，我还是先说说我的程序吧，不然有点乱。某机器若提供http、ftp服务，则用winsock和Inet控件将其内容下载：......'调用了connect后，再判断它的状态Winsock1.RemoteHost = ip
Winsock1.RemotePort = 80
Winsock1.Connect
url="http://"+ip
If Winsock1.State = sckConnecting Then
str = Inet1.OpenURL(url)‘inet1是已建立的Internet Transfer Control
Winsock1.Close
End If现在情况是：如果ip提供了http服务，工作很快完成。但如果没有这些服务，ping也
ping不通的话，就惨了，要1－2分钟才结束:( 可我不希望这样，
怎么办，不知各位大侠有何高招？谢谢!
我一定加分（不过我自己也很可怜，分数不多，请大侠们谅解！）