VBからPingを利用して、その結果を得るにはどうすればよういのでしょうか?
昔同じ事をここで書きましたよ。
PINGで検索してみてください。
ちなみにここです。
http://madia.world.coocan.jp/cgi-bin/VBBBS2/wwwlng.cgi?print+200208/02080041.txt
完璧な内容です!!失礼しました。助かります〜
okuさんの書いたソースでpingの結果を得ることは出来ましたが、応答時間(RoundTripTime)をテキストボックスやメッセージボックスに表示させようと
すると、正常な時は「0」、タイムアウトの時は「589844」と表示してしまいます。これは一体何の数字なんでしょうか?
ソースはこちらのものかな?
http://vbnet.mvps.org/index.html?code/internet/ping.htm
Text3(2).Text = ECHO.RoundTripTime & " ms"
レスありがとうございます。
ソースは別モノでしたのでそちらのソースでも試してみましたが、やはり応答時間
は正常時に「0」、タイムアウト時は「589844」と表示されてしまいます…
ツイート | ![]() |