Script das in "schülervz" einlogt.

1. offizieller Beitrag

    Hi,
    ich bin seit gestern dabei ein Script zu schreiben, dass in Schülervz einlogt, faile aber andauernd, hab auch ziemlich keine Ahnung wieso..^^..

    Also das script trägt die richtigen Daten ein, submitted dann, aber angeblich stimmt email /pw nicht...

    [autoit]

    #include <GUIConstants.au3>
    #include <IE.au3>
    #include <file.au3>

    [/autoit][autoit][/autoit][autoit]

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Christian\Desktop\Form1.kxf
    $Form1 = GUICreate("Daten", 116, 162, 258, 133)
    $addyinput = GUICtrlCreateInput("Email hier rein", 8, 16, 49, 21)
    $pwinput = GUICtrlCreateInput("Pw hier rein", 8, 40, 49, 21)
    $OK = GUICtrlCreateButton("OK", 8, 96, 57, 33, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    Func login()
    $o_form = _IEFormGetObjByName($oI, "login")
    $o_login = _IEFormElementGetObjByName($o_form, "login_email")
    $o_password = _IEFormElementGetObjByName($o_form, "login_password")
    _IEFormElementSetValue($o_login,$addy)
    _IEFormElementSetValue($o_password,$pw)
    _IEFormSubmit ($o_form)
    Exit
    EndFunc

    [/autoit][autoit][/autoit][autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $OK
    $addy = (GUICtrlRead ($addyinput))
    $pw = (GUICtrlRead ($pwinput))
    $oI = _IECreate("http://www.schuelervz.net/Login")
    login()
    EndSwitch
    WEnd

    [/autoit]

    ich hoffe jemand findet den fehler

    mfg unaimed

    Einmal editiert, zuletzt von unaimed (14. Dezember 2008 um 15:21)

    So:

    [autoit]


    #include <GUIConstants.au3>
    #include <IE.au3>
    #include <file.au3>

    [/autoit][autoit][/autoit][autoit]

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Christian\Desktop\Form1.kxf
    $Form1 = GUICreate("Daten", 116, 162, 258, 133)
    $addyinput = GUICtrlCreateInput("Email hier rein", 8, 16, 49, 21)
    $pwinput = GUICtrlCreateInput("Pw hier rein", 8, 40, 49, 21)
    $OK = GUICtrlCreateButton("OK", 8, 96, 57, 33, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

    Func login()
    $o_form = _IEFormGetObjByName($oI, "login")
    $o_login = _IEFormElementGetObjByName($o_form, "login_email")
    $o_password = _IEFormElementGetObjByName($o_form, "login_password")
    _IEFormElementSetValue($o_login,$addy)
    _IEFormElementSetValue($o_password,$pw)
    _IEFormSubmit ($o_form)
    Exit
    EndFunc

    [/autoit][autoit][/autoit][autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $OK
    $addy = GUICtrlRead ($addyinput)
    $pw = GUICtrlRead ($pwinput)
    $oI = _IECreate("http://www.schuelervz.net/Login")
    login()
    EndSwitch
    WEnd

    [/autoit]

    klappt leider immernoch nicht.. :< selbes problem...richtige daten, aber krieg sie als falsch zurück.

    Dann beschreib doch mal was passiert oder was falsch passiert?!
    Ich kann dirj etzt aber erstmal nicht mehr helfen. Muss ein paar Dinge erledigen!

    also ich beschreib mal alles ganz genau...:
    IE wird geöffnet, schülervz geht auf. Er gibt die richtigen daten zum einloggen an, "drückt enter" (submit halt..) aber anstatt dananch eingeloggt zu sein, kommt das fenster, dass einem sagt das pw oder email falsch sind.

    Achso , versuch das mal:

    [autoit]


    Opt ("WinTitlematchMode",2)
    ShellExecute("www.schuelervz.net")
    WinWaitActive ( "schuelervz")
    Send ("{TAB}")
    Sleep (200)
    Send ("maxmusterman@hotmail.de") ; e-mail
    Sleep (200)
    Send ("{TAB}")
    Send ("Musterman") ; passwort

    [/autoit]

    gtaspider: weil ich während ich im urlaub bin alle messages mit "Ich bin die nächsten 3 Wochen nicht da, werd dir später antworten." beantworten will.

    r1flex: das is natürlich auch ne idee...:D habs mir irgendwie bissl zu kompliziert gedacht xD!