Register for your free account! | Forgot your password?

You last visited: Today at 12:59

  • Please register to post and access all features, it's quick, easy and FREE!

 

Spambot

Reply
 
Old   #1
 
elite*gold: 11
Join Date: Jun 2010
Posts: 289
Received Thanks: 49
Spambot

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



Suisu is offline  
Old   #2
 
elite*gold: 0
Join Date: Mar 2010
Posts: 77
Received Thanks: 26
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^^


Kaqqy147 is offline  
Thanks
1 User
Old   #3
 
elite*gold: 11
Join Date: Jun 2010
Posts: 289
Received Thanks: 49
K darauf hätte ich kommen können xD

EDIT: Geht immernoch nicht !
Suisu is offline  
Old   #4
 
elite*gold: 0
Join Date: Mar 2010
Posts: 77
Received Thanks: 26
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:


Kaqqy147 is offline  
Old   #5
 
elite*gold: 11
Join Date: Jun 2010
Posts: 289
Received Thanks: 49
ne das hilft mir nicht ^^
der fehler liegt an
Code:
WinWaitActive($Input1)
Suisu is offline  
Old   #6
 
elite*gold: 0
Join Date: Feb 2009
Posts: 53
Received Thanks: 20
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.
Shkal is offline  
Old   #7
 
elite*gold: 11
Join Date: Jun 2010
Posts: 289
Received Thanks: 49
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?
Suisu is offline  
Old   #8
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
;WinWaitActive($Input1) kannste weg lassen.
Send(GUICtrlRead($Input2))
omer36 is offline  
Old   #9
 
elite*gold: 11
Join Date: Jun 2010
Posts: 289
Received Thanks: 49
Nein ich möchte das er mit dem Schreiben wartet bis das fenster sich geöffnet hat den er zuspammen möchte
Suisu is offline  
Old   #10
 
elite*gold: 52
The Black Market: 101/0/0
Join Date: Oct 2010
Posts: 1,998
Received Thanks: 389
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
BlackHybrid is offline  
Thanks
1 User
Old   #11
 
elite*gold: 11
Join Date: Jun 2010
Posts: 289
Received Thanks: 49
So neues Prob er schreibt jetzt nurnoch "4"
Suisu is offline  
Old   #12
 
elite*gold: 52
The Black Market: 101/0/0
Join Date: Oct 2010
Posts: 1,998
Received Thanks: 389
Wie wäre es mit Send(GUICtrlRead($Input2)) :P


BlackHybrid is offline  
Thanks
1 User
Reply



« Previous Thread | Next Thread »

Similar Threads
Spambot V4.2
http://h-1.abload.de/img/unbenanntjuv0.png Download -up to 4 textboxes -3 types of antimute (for warrock) -3 types of antidetect -hotkeys...
11 Replies - WarRock Hacks, Bots, Cheats & Exploits
[SX] Spambot V4
Screenshot] http://www.abload.de/img/spambotv4jhff.png Functions] -up to 4 textboxes -3 types of antimute (for warrock) -3 types of...
10 Replies - WarRock Hacks, Bots, Cheats & Exploits
SPambot
huuh hab mal ne frage, ich will mir meinen eigenen sPambot machn, kann mir da jemand tiPPs oder ein tool geben? mfg
8 Replies - Last Chaos
SpamBot :s
Hi , someone can say me where i can get a spambot to 2moons... :s i was searching on internet and nothing... Please dont comment saying "U are a...
3 Replies - Dekaron



All times are GMT +1. The time now is 12:59.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2017 elitepvpers All Rights Reserved.