Button Problem

Page 2 of 2 1 2
02/20/2010 15:16 kknb#16
guictrlread($input)
02/20/2010 16:32 HardCore.1337#17
genau. Bin nicht drauf gekommen wie das heißt. Kleine Denkblockade
02/20/2010 18:28 Σternαl.#18
Und das müsste ich dann einfach vor die For schleife machen?
02/20/2010 18:37 HardCore.1337#19
ja, davor
02/20/2010 18:46 kknb#20
For $i = 1 to guictrlread($input)
02/20/2010 21:44 Σternαl.#21
Ah ok,thx^^
Da kommt mir doch grad NOCH ein Problem entgegen =D
Und zwar möchte ich nen Bot für ein Browsergame (bitte nicht lachen =D) machen,
der nur als Einlogg-Bot fungieren soll, das ist alles nur zur Übung^^
Aber beim Internet Explorer wird das mit hwnd holen ja ein bisschen umständlich.
Muss ich da nach jedem Seitenladen den hwnd erneut holen, oder gibts da irgend nen Trick?
02/20/2010 21:51 kknb#22
[Only registered and activated users can see links. Click Here To Register...]
02/20/2010 22:25 Σternαl.#23
Man das sieht ja kompliziert aus QQ
Ich versuchs mal ohne Hilfe zu schaffen :)

€dit: So hab mal einen gemacht, aber ich würd gerne noch ein Bild in die GUI machen, also als Hintergrundbild.
Weiß jemand, wie man das macht?
02/20/2010 23:12 kknb#24
ja mit koda form designer oder f1 in scite ->google...
02/21/2010 01:49 Σternαl.#25
Sooo, hab mir jetzt mal nen Habbo Hotel Einlogger Bot gemacht (ich spiel kein Habbo Hotel^^).
Der is eig für meine Schwester^^
Hier der Source:
PHP Code:
#include <GUIConstants.au3>

$Form1_1 = GUICreate("Form1", 630, 446, 193, 125)
$Label1 = GUICtrlCreateLabel("Username", 128, 104, 115, 53)
GUICtrlSetFont(-1, 33, 400, 2, "Got heroin?")
$Start = GUICtrlCreateButton("Start", 136, 272, 123, 49, 0)
GUICtrlSetFont(-1, 33, 800, 2, "Got heroin?")
$username = GUICtrlCreateInput("", 312, 128, 121, 21)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Stop = GUICtrlCreateButton("Stop", 312, 272, 123, 49, 0)
GUICtrlSetFont(-1, 33, 800, 2, "Got heroin?")
$Label2 = GUICtrlCreateLabel("Password ", 128, 176, 138, 53)
GUICtrlSetFont(-1, 33, 800, 2, "Got heroin?")
$password = GUICtrlCreateInput("", 312, 192, 121, 21)
GUISetState(@SW_SHOW)

Sleep(100)
$hwnd2 = WinGetHandle("Habbo loggin Bot")

Opt("SendKeyDownDelay", 50)
Opt("SendKeyDelay", 50)

Func hello()
    Run("C:\Programme\Internet Explorer\iexplore.exe", "", @SW_MAXIMIZE) 
    Sleep(7000)

    $hwnd = WinGetHandle("Google - Windows Internet Explorer") 

    ControlSend($hwnd, "", 0, "{F6}")
    Sleep(50)
    ControlSend($hwnd, "", 0, "www.habbo.de")
    Sleep(50)
    ControlSend($hwnd, "", 0, "{enter}")
    Sleep(5000)
    ControlSend($hwnd, "", 0, "{F6}")
    Sleep(50)
    ControlSend($hwnd, "", 0, "{F6}")
    Sleep(50)
    ControlSend($hwnd, "", 0, "{F6}")
    Sleep(50)
    ControlSend($hwnd, "", 0, guictrlread($username))
    Sleep(50)
    ControlSend($hwnd, "", 0, "{TAB}")
    Sleep(50)
    ControlSend($hwnd, "", 0, guictrlread($password))
    Sleep(50)
    ControlSend($hwnd, "", 0, "{enter}")
    Sleep(1000)
    MsgBox("", "Alter Habbo Suchtie ;D", "VIEL SPASS BEIM ZOCKEN!")
EndFunc

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $Start
            hello()
            
        Case $Stop
            ExitLoop
    EndSwitch
WEnd

Exit 
UND HIIIEEER DAS BILD =D
02/21/2010 02:55 kknb#26
tja schon schade das du trotz des tuts mit diesem send bla arbeitest.
02/21/2010 08:11 Σternαl.#27
Ja, das Tut ist ein bisschen zu hoch für mich^^
Aber was ist denn an ControlSend so schlimm?
Hab sogar hingekrigt, dass das Passwort zensiert angezeigt wird^^
Btw ich programmier mit AutoIt seit vllt 3 Tagen erst :D

€dit: Ich weiß nicht, was ich für die IE Befehle includen bzw. downloaden muss.
Sonst hätte ich die Befehle auch verwendet^^
Wie gesagt, bin Anfänger :D
Belehre mich eines besseren ;)
02/21/2010 08:53 HardCore.1337#28
Es ist nicht direkt schlimm, kann aber leichter zu Fehlern etc. führen

Wenn du direkt die Packets versendest, bist du auf der sicheren Seite und hast außerdem weniger Tipparbeit
Page 2 of 2 1 2