Spambot

09/29/2010 18:26 Suisu#1
Hey,
bin noch nicht lange bei AutoIT zugange und wolte nen Spam bot basteln xD
was habe ich falsch gemacht?

Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spammer", 256, 90, 378, 210)
GUISetIcon("C:\Program Files\ICQ7.2\ICQ.exe")
$Input1 = GUICtrlCreateInput("Name der Person die zugespammt werden soll ", 8, 8, 241, 21)
$Input2 = GUICtrlCreateInput("Was soll gespammt werden?", 8, 32, 241, 21)
$Button1 = GUICtrlCreateButton("Start", 40, 56, 177, 25, 0)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1 
            _Spam ()
    EndSwitch
WEnd
Func _Spam ()
While 1
WinWaitActive($Input1)
Send($Input2)
Send("{ENTER}")
Sleep(200)
WEnd
EndFunc
09/29/2010 18:34 Kaqqy147#2
Quote:
Originally Posted by Suisu View Post
Hey,
bin noch nicht lange bei AutoIT zugange und wolte nen Spam bot basteln xD
was habe ich falsch gemacht?

Code:
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Spammer", 256, 90, 378, 210)
GUISetIcon("C:\Program Files\ICQ7.2\ICQ.exe")
$Input1 = GUICtrlCreateInput("Name der Person die zugespammt werden soll ", 8, 8, 241, 21)
$Input2 = GUICtrlCreateInput("Was soll gespammt werden?", 8, 32, 241, 21)
$Button1 = GUICtrlCreateButton("Start", 40, 56, 177, 25, 0)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[COLOR="Red"][B][U]While 1[/U][/B][/COLOR]
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1 
            _Spam ()
    EndSwitch
WEnd
Func _Spam ()
[COLOR="red"][U][B]While 1[/B][/U][/COLOR]
WinWaitActive($Input1)
Send($Input2)
Send("{ENTER}")
Sleep(200)
WEnd
EndFunc
Ich habe dir mal die falsche Stelle makiert^^
Jede While-Schleife besitzt eine andere Zahl.
Bei dir allerdings gibt es 2x While1...
Also nenn ein While in While 2 um und fertig...^^
THX ist erwünscht^^
09/29/2010 18:37 Suisu#3
K darauf hätte ich kommen können xD

EDIT: Geht immernoch nicht !
09/29/2010 18:48 Kaqqy147#4
Falls er wie ich vermute den falschen Text sendet, also immer nur ne 1 oda so, dann weiß ich nicht weiter, denn das gleich Prob hab ich auch. Siehe hier: [Only registered and activated users can see links. Click Here To Register...]
09/29/2010 18:53 Suisu#5
ne das hilft mir nicht ^^
der fehler liegt an
Code:
WinWaitActive($Input1)
09/29/2010 18:55 Shkal#6
Quote:
Originally Posted by Kaqqy147 View Post
Ich habe dir mal die falsche Stelle makiert^^
Jede While-Schleife besitzt eine andere Zahl.
Bei dir allerdings gibt es 2x While1...
Also nenn ein While in While 2 um und fertig...^^
THX ist erwünscht^^
wo hast du denn den Scheiß aufgegabelt?
Die Zahl hinter While ist ein WAHRHEITSWERT; Die Schleifenbedingung.

While 1 heißt dementsprechend so viel wie "Solange WAHR". Ändert sich dieser Wert auf False, also Falsch, wird auch die Schleife nicht mehr wiederholt.

Code:
Local $iZahl = 0
While $iZahl < 5
     $iZahl = $iZahl + 1
WEnd
Zu dem eigentlichen Problem:
Die Variabeln, die du sendest (bzw die du versuchst als Fenstertitel zu benutzen) beinhalten nicht den Text des Eingabefeldes, sondern dessen ID. Den Text musst du zuerst mit GUICtrlRead() auslesen.
09/29/2010 19:23 Suisu#7
Quote:
Originally Posted by Shkal View Post

Zu dem eigentlichen Problem:
Die Variabeln, die du sendest (bzw die du versuchst als Fenstertitel zu benutzen) beinhalten nicht den Text des Eingabefeldes, sondern dessen ID. Den Text musst du zuerst mit GUICtrlRead() auslesen.
Also wie müsste der Code jetzt aussehen? :D
09/29/2010 19:30 omer36#8
;WinWaitActive($Input1) kannste weg lassen.
Send(GUICtrlRead($Input2))
09/30/2010 17:33 Suisu#9
Nein ich möchte das er mit dem Schreiben wartet bis das fenster sich geöffnet hat den er zuspammen möchte
10/01/2010 22:34 BlackHybrid#10
Wenn du etwas aus einer GUI auslesen möchtest brauchst du immer GUICtrlRead also wird aus:
WinWaitActive($Input1)
WinWaitActive(GUICtrlRead($Input1))
Ich haffe ich konnte dir helfen ;)
10/02/2010 19:30 Suisu#11
So neues Prob er schreibt jetzt nurnoch "4"
10/02/2010 19:49 BlackHybrid#12
Wie wäre es mit Send(GUICtrlRead($Input2)) :P