如何使用Delphi 5快速检查网络位置是否存在？

Question

可能的重复项：
加快不存在的网络共享的File.Exists的
速度。

我们需要将文本写入网络上的文件，但是可能存在该位置不存在的情况，而我们需要写入另一个位置。您如何快速检查网络位置是否存在？尝试使用“ try ... except”将文本写入不存在的位置需要花费30秒钟。当然必须有一个更快的方法吗？

如果有人可以给我一些指示，我将不胜感激。

谢谢！

Answer 1

对于那些对Delphi上下文的答案感兴趣的人，我使用了Indy组件IdIcmpClient组件来ping IP，如下所示：

  IdIcmpClient1.Host:= '10.0.0.999';
  try
    IdIcmpClient1.Ping();
  except
    showmessage('Not found');
  end;

如果结果不存在，您将在3秒钟内得到结果，如果不存在，则几乎立即得到结果。