|
|
Code Samples
The product includes numerous VB.NET, C# and ASP.NET sample applications. All
samples include complete source code. For more detailed sample code please
refer to the sample applications.
Tracing a Route to a Server
Listing 1 demonstrates using the asynchronous BeginTraceRoute
method to perform a trace route to a server.
The OnTraceRouteTimingCompleted event is fired when
an individual timing to a hop has been completed.
The OnTraceRouteHopCompleted event is fired when
all timings to a hop have been completed.
The OnTraceRouteCompleted event is fired when
the server has been reached or the hop limit exceeded.
Alternatively, the synchronous TraceRoute method may be used.
Private traceRouteClient As TraceRouteClient
Private Sub StartTraceRoute()
' Start the trace route.
traceRouteClient = New TraceRouteClient()
traceRouteClient.SynchronizingObject = Me
AddHandler traceRouteClient.TraceRouteTimingCompleted, _
AddressOf OnTraceRouteTimingCompleted
AddHandler traceRouteClient.TraceRouteHopCompleted, _
AddressOf OnTraceRouteHopCompleted
AddHandler traceRouteClient.TraceRouteCompleted, _
AddressOf OnTraceRouteCompleted
traceRouteClient.BeginTraceRoute(textBoxTargetName.Text)
End Sub
Private Sub OnTraceRouteTimingCompleted(ByVal sender As Object, _
ByVal e As TraceRouteTimingCompletedEventArgs)
Dim traceRouteTiming As TraceRouteTiming
traceRouteTiming = e.TraceRouteTiming
' Process the trace route timing information
End Sub
Private Sub OnTraceRouteHopCompleted(ByVal sender As Object, _
ByVal e As TraceRouteHopCompletedEventArgs)
' Process the trace route hop completed event
End Sub
Private Sub OnTraceRouteCompleted(ByVal sender As Object, _
ByVal e As TraceRouteCompletedEventArgs)
traceRouteClient.EndTraceRoute(e.AsyncResult)
" Process the trace route completed event
End Sub
|
Listing 1 Tracing a route to a server
|