| OneStep | The OneStep method sends an ICMP echo request to the specified destination host and returns any replies received within the timeout specified. |
| IPFlags | IP header flags |
| Byte, RW | |
| RequestSize | Size of request in bytes. |
| Long, RW | |
| TimeOut | Time in milliseconds to wait for reply |
| Long, RW | |
| TTL | Time To Live |
| Byte, RW | |
| TypeOfService | Type Of Service |
| Byte, RW | |
| DataSize | Echo data size. |
| Long, RO | |
| RoundTripTime | Round Trip Time in milliseconds |
| Long, RO | |
| Status | IP status value |
| IPStatus, RO |
| ||
| TraceRoute from www.motobit.com |
| ||
Dim Trace
Set Trace = CreateObject("TCPIP.Trace")
Dim I, IP, RoundTripTime, Status, TTL
Trace.TimeOut = 8000
For I = 1 To 10
IP = Trace.OneStep(I, "www.microsoft.com")
Debug.Print IP & Chr$(9) & Trace.RoundTripTime & Chr$(9) & Trace.TTL & Chr$(9) & Trace.Status
If Trace.Status = 0 Then I = 100
Next I |