Hilfe beim Objekt "IE"

  • Hallo,
    So hab meine Idee fast Verwirklicht!
    Diese wäre: Das Tool öffnet eine Gui mit dem IE Objekt und sendet benutzerdaten und klickt den LOGIN button an !. Jedoch muss ein Mausklick auf das objekt oder feld durchgeführt werden ??
    Wäre nett wenn Jemand helfen würde

    mfg
    mazo

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <IE.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Fast Login", 678, 543, 169, 97)
    GUISetBkColor(0x808080)
    $ie = _IECreateEmbedded()
    $Group1 = GUICtrlCreateObj($ie, 0, 25, 677, 520)
    GUISetState(@SW_SHOW)
    _IENAVIGATE($ie,"https://www.pin2sale.de/ArianaCall")
    #EndRegion ### END Koda GUI section ###

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

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

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

    EndSwitch
    WEnd

    [/autoit]

    Einmal editiert, zuletzt von mazo09 (10. April 2009 um 22:16)

  • Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <IE.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Fast Login", 678, 543, 169, 97)
    GUISetBkColor(0x808080)
    $ie = _IECreateEmbedded()
    $Group1 = GUICtrlCreateObj($ie, 0, 25, 677, 520)
    GUISetState(@SW_SHOW)
    _IENAVIGATE($ie,"https://www.pin2sale.de/ArianaCall",1)
    #EndRegion ### END Koda GUI section ###

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

    $Usename = _IEGetObjByName($ie, "username")
    _IEFormElementSetValue($Usename, "Test")

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

    $KundenNr = _IEGetObjByName($ie, "customerno")
    _IEFormElementSetValue($KundenNr, "Test")

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

    $Passwort = _IEGetObjByName($ie, "password")
    _IEFormElementSetValue($Passwort, "Test")

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

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

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

    EndSwitch
    WEnd

    [/autoit]


    jetzt werden die felder ausgefüllt

  • Morgen,

    1. Vielen Dank ! jedoch geht dass mit dem Klick nicht ! Klick auf den Ok Button! Weder mit Submit oder mit Click!

    2. Weiss ich niht so ganz ;)

    mfg

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <IE.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Fast Login", 678, 543, 169, 97)
    GUISetBkColor(0x808080)
    $ie = _IECreateEmbedded()
    $Group1 = GUICtrlCreateObj($ie, 0, 25, 677, 520)
    GUISetState(@SW_SHOW)
    _IENAVIGATE($ie,"https://www.pin2sale.de/ArianaCall",1)
    #EndRegion ### END Koda GUI section ###
    $config=FileOpen("Config.dat",0)
    If $config = -1 Then
    MsgBox(0, "Error", "Konfigurationsdatei C:\Programme\Telecards\Config.dat nicht vorhanden")
    Exit
    EndIf
    $initwait=FileReadLine($config,1)
    $customer=FileReadLine($config,2)
    $username=FileReadLine($config,3)
    $password=FileReadLine($config,4)
    FileClose($config)

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

    $Usename = _IEGetObjByName($ie, "username")
    _IEFormElementSetValue($Usename,$customer)

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

    $KundenNr = _IEGetObjByName($ie, "customerno")
    _IEFormElementSetValue($KundenNr, $username)

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

    $Passwort = _IEGetObjByName($ie, "password")
    _IEFormElementSetValue($Passwort,$password)
    _IEFormSubmit($ie,1)

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

    _IEFrameGetObjByName($ie,"Go")
    _IeformSubmit($ie,"go")

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

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

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

    EndSwitch
    WEnd

    [/autoit]