Hello in the ping app i am using this code

try
            Dim ping As New System.Net.NetworkInformation.Ping
            Return ping.Send(hostNameOrAddress,5000,300).RoundtripTime
        Catch ex As Exception
            MsgBox("Computer Ping Could Not Be Called")
        End Try

but my app will not accept 300 as a amount of bytes,

Help!

Recommended Answers

All 2 Replies

You're not sending 300 bytes, you're trying to send integer "300"

Try
  Dim ping As New System.Net.NetworkInformation.Ping
  Dim Buffer(299) As Byte ' A buffer for 300 bytes
  ' Fill Buffer()
  Return ping.Send(hostNameOrAddress, 5000, Buffer).RoundtripTime
Catch ex As Exception
  MsgBox("Computer Ping Could Not Be Called")
End Try

Thanks

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.