Click here to Skip to main content
15,896,606 members
Please Sign up or sign in to vote.
0.00/5 (No votes)
See more:
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)
Posted

1 solution

 
Share this answer
 
Comments
Dominic Abraham 12-Dec-12 8:02am    
If the solution is helpful don't forget to mark it as answer. So that it may help others with similar issues.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)



CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900