Visual Basic Forum

Airwaver_ · Newbie Anmeldedatum: 11.06.2007 Beiträge: 3

Hi

dies ist meine erste Arbeit mit VB ^^ und ich würde gerne nen paar Kritiken dazu bekommen Very Happy

Hier der Download
http://www.klassenpage.de/Dateien/Allround%20Chat%20Flooder.exe

Hier der Quelltext
[code]
Private Sub cmd_flood_Click()

timerwait.Enabled = True

End Sub

Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)

End Sub

Private Sub cmd_stop_Click()

timerknuddels.Enabled = False
timerflood.Enabled = False
timerwait.Enabled = False

End Sub

Private Sub timerflood_Timer()

timerflood.Interval = txt_wait2 * 1000

SendKeys (txt_eingabe2.Text)
SendKeys ("{enter}")

timerflood.Enabled = False

timerknuddels.Enabled = True

End Sub

Private Sub timerknuddels_Timer()

timerknuddels.Interval = txt_wait2 * 1000

SendKeys (txt_eingabe.Text)
SendKeys ("{enter}")

timerknuddels.Enabled = False

timerflood.Enabled = True

End Sub

Private Sub timerwait_Timer()

timerwait.Interval = txt_wait1

timerknuddels.Enabled = True

timerwait.Enabled = False

End Sub
[/code]

Vielen Dank
Mfg Airwaver

Ja!lB!rD_ · Coder Anmeldedatum: 09.06.2007 Beiträge: 79

Wenn das dein erstes Projekt war und du das ohne C&P gemacht hast, dann mach weiter so !

EDIT: So könnte man dann doch auch noch den Spamschutz von icq verarschen oder!? Ich möchte um die Uhrzeit niemand mehr in meiner Kontaktliste stressen! Very Happy

[S] unbegrenzt 6er UIN´s [B]Steam
[S] RS.com Prem Acc´s [B]Steam

Miah_ · Coder Anmeldedatum: 22.04.2007 Beiträge: 96

nein so kann man ICQ nicht verarschen, da die den abstand und die masse an nachrichten zur spamerkennung benutzen.

nettes anfängerprojekt, auch wenn die zeit bis zum ersten floding nicht funktioniert Wink