如何连续ping和IP [英] how to continously ping and IP

问题描述

你好，伙计们，我正在努力完成我的最后一年项目，所以我正在开发一个网络工具，它将在一些时间间隔后连续ping和ip，所以当网络设备关闭时它会发送和短信警报对于技术人员来说，这是我到目前为止所提出的帮助



Dim Ip As String

Ip = TextBox2.Text

将字符串调暗为

a =设备已启动并运行

Dim b As String

b =Ping请求超时

如果My.Computer.Network.Ping（Ip）那么



''MsgBox（设备已启动并运行 ）

ListBox1.Items.Add（a）









其他



''MsgBox（Ping请求超时。）

ListBox1.Items.Add（ b）

Hello Guys please i''m working on my final year project so i''m developing a network tool that will continously ping and ip after some set of intervals, so when ever a network device is down it send and sms alert to the technician, here is what i came up so far with plss help

Dim Ip As String
Ip = TextBox2.Text
Dim a As String
a = "Device is Up and Runing"
Dim b As String
b = "Ping Request Time Out"
If My.Computer.Network.Ping(Ip) Then

''MsgBox("Device is Up and Runing")
ListBox1.Items.Add(a)




Else

''MsgBox("Ping request timed out.")
ListBox1.Items.Add(b)

推荐答案

您好b $ b

请参考以下网址：



http://msdn.microsoft.com/en-us/library/system.net.networkinformation.pingreply.aspx [ ^ ]





问候

Dominic

Hi
Please refer the below url:

http://msdn.microsoft.com/en-us/library/system.net.networkinformation.pingreply.aspx[^]


Regards
Dominic

这篇关于如何连续ping和IP的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！