Killsoft Sugdok

Ping Flooder In Vb.NET

Go down

Ping Flooder In Vb.NET

Post by giovhz on Sat Mar 09, 2013 8:09 am

Try this code. how to create pinger....

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

Dim ping As Ping = New Ping()
Dim pingreply As PingReply = ping.Send("")
TextBox1.Text &= "Address: " & pingreply.Address.ToString()
TextBox1.Text &= "Roundtrip Time: " & pingreply.RoundtripTime
TextBox1.Text &= "TTL (Time To Live): " & pingreply.Options.Ttl
TextBox1.Text &= "Buffer Size: " & pingreply.Buffer.Length.ToString()

Catch err As Exception

End Try

End Sub

Posts : 41
Join date : 2013-03-09

Back to top Go down

Back to top

- Similar topics

Permissions in this forum:
You cannot reply to topics in this forum