Ping and detecting loss

Hot Topic

format string...
Post Publication Problem -
Locating a Label Handle
Black screen
How do Make my Database Run without having me COMPILE It everytime
Creating a dinamic menu, second part xD
repeat delay in Keydown event
windows generated code
User session logon time!
Text File Problem

Visual Basic

VB Application Settings
matrix algebra, how to do it in VB
ERROR The data provider or Service Provider returned an state E_FAIL
Turn off green coloring after filling out a snippet?
Displaying a file if hexadecimal format.
Enumerate class properties?
Error 'Cast 'when Insert in 2003
TextBox Contents and Insertion Cursor Location
client server
SQL Select Statements for database

Ping and detecting loss

Hi,

I've looked through the ping class and was wondering if there is way to determine the packets sent and received (packet loss)

Thanks in advance!

Answer this question

Ping and detecting loss

  • Osmar

    Well, yes... Just run the Ping.Send() n times and check its response...

    Private Sub pingHost(ByVal source As String, ByVal numOfPackages As Integer)

    Dim p As New System.Net.NetworkInformation.Ping()

    Dim pReply As System.Net.NetworkInformation.PingReply

    Dim validPackages, invalidPackages As Integer

    For index As Integer = 1 To numOfPackages

    pReply = p.Send(source)

    If (pReply.Status = Net.NetworkInformation.IPStatus.Success) Then

    validPackages = +1

    End If

    Next

    invalidPackages = numOfPackages - validPackages

    End Sub
  • Ping and detecting loss
Answer this question