How to get id or name in _IE

[DoctorSLO]

Hey

I'm writing some program, and I need auto login.

$OdpriIE = _IECreate("http://ikariam.si", 0, 1, 1, 1)
$_Uporabnik = _IEGetObjById($OdpriIE, "login")
If IsObj($_Uporabnik) Then $_Uporabnik.value = $Uporabnik
$_Pw = _IEGetObjById($OdpriIE, "pwd")
If IsObj($_Pw) Then $_Pw.value = $Pw

The variables Uporabnik, Pw ... are defined before this code. Now here it fill in login name and password. I want now to press on Login button, this must look like this:

$Potrdi = _IEGetObjByName($OdpriIE, "What must be here??!")
If ISObj($Potrdi) Then $Potrdi.click

But hell I cant get ID or name of this button, here is how its look on web:

<td><input id="login" name="name" type="text" class="login" /></td>
                    <td><input id="pwd"  name="password" type="password" class="pass" /></td>
                    <td><input type="submit" class="button" value="Login" /></td>

Are there some other options to do that (not mouse click) or what can I do ...

Edited January 17, 2009 by DoctorSLO

[Pain]

Use _IEAction or _IEFormSubmit.

[DoctorSLO]

Its not work

Here is all html code:

<form id="loginForm" name="loginForm" action="#" onsubmit="changeAction('login');" method="post">
        <div id="formz">
            <table cellpadding="0" cellspacing="0" id="logindata">
                <tr>
                    <td><label for="welt" class="labelwelt">Svet</label></td>
                    <td><label for="login" class="labellogin">Ime igralca</label></td>
                    <td><label for="pwd" class="labelpwd">Geslo</label></td>
                    <td></td>
                </tr>
                <tr>
                    <td>
                        <select id="universe" class="uni" size="1">
                            <option value="s1.ikariam.si">Alpha</option>
                        </select>
                    </td>
                    <td><input id="login" name="name" type="text" class="login" /></td>
                    <td><input id="pwd"  name="password" type="password" class="pass" /></td>
                    <td><input type="submit" class="button" value="Login" /></td>
               </tr>
               <tr>
                    <td colspan="3" class="forgotpwd"><a href="lostpwd.php" title="Tukaj lahko zahtevate novo geslo">Ste pozabili geslo?</a></td>
                    <td style="font-size:10px; text-align:left; padding:4px 0px 0px 16px;">
                        S prijavo sprejmem<br />
                        <a style="color:#DF5843; margin-left:0px;" target="_blank" class="footerlink" href="http://impressum.gameforge.de/index.php?lang=si&amp;art=tac&amp;special=&amp;&f_text=000000&amp;f_text_hover=804000&amp;f_text_h=9ebde4&amp;f_text_hr=DED3B9&amp;f_text_hrbg=DED3B9&amp;f_text_hrborder=804000&amp;f_text_font=verdana%2C+arial%2C+helvetica%2C+sans-serif&amp;f_bg=DED3B9">Pogoji Uporabe</a>.
                    </td>
               </tr>
           </table>
        </div>
    </form>

And here is my code:

$OdpriIE = _IECreate("http://ikariam.si", 0, 1, 1, 1)
$Form = _IEFormGetObjByName ($OdpriIE, "loginForm")
$_Uporabnik = _IEFormElementGetObjByName($OdpriIE, "name")
$_Pw = _IEFormElementGetObjByName($OdpriIE, "password")
_IEFormElementSetValue ($_Uporabnik, $Uporabnik)
_IEFormElementSetValue ($_Pw, $Pw)
_IEFormSubmit ($Form)

errors

$_IEStatus_InvalidObjectType

Edited January 17, 2009 by DoctorSLO

[DoctorSLO]

The only think that its work is this :

$OdpriIE = _IECreate("http://ikariam.si", 0, 1, 1, 1)
$Form = _IEFormGetObjByName ($OdpriIE, "loginForm")
$_Uporabnik = _IEGetObjById($OdpriIE, "login")
If IsObj($_Uporabnik) Then $_Uporabnik.value = $Uporabnik
$_Pw = _IEGetObjById($OdpriIE, "pwd")
If IsObj($_Pw) Then $_Pw.value = $Pw
    Sleep(2000)
_IEFormSubmit($Form)

It fills Username and Password, and after 2 sec something do, I dont know what (like refresh), and the Username and PW gone form IE login.

[TerarinK]

$OdpriIE = _IECreate("http://ikariam.si", 0, 1, 1, 1)
$Form = _IEFormGetObjByName ($OdpriIE, "loginForm")
$_Uporabnik = _IEFormElementGetObjByName($Form, "name")
$_Pw = _IEFormElementGetObjByName($Form, "password")
_IEFormElementSetValue ($_Uporabnik, "PLACE USER NAME")
_IEFormElementSetValue ($_Pw, "PLACE PASSWORD")
_IEFormSubmit ($Form)

Edited January 17, 2009 by TerarinK

[Pain]

#include <IE.au3> 
$Uporabnik = "test"
$Pw = "test"

$OdpriIE = _IECreate("http://ikariam.si", 0, 1, 1, 1)
$Form = _IEFormGetObjByName($OdpriIE, "loginForm")
$_Uporabnik = _IEFormElementGetObjByName($Form, "name")
$_Pw = _IEFormElementGetObjByName($Form, "password")
_IEFormElementSetValue($_Uporabnik, $Uporabnik)
_IEFormElementSetValue($_Pw, $Pw)
_IEFormSubmit($Form)

[DoctorSLO]

For me it's not work

Try to run your script ... For me fill in name and password, and then nothing happened . . . No error that login is incorrect, just nothing

Error message is like this (in my language)

Napaka!

Napačno uporabniško ime ali napačno geslo!

http://ikariam.si/

Edited January 17, 2009 by DoctorSLO

[DoctorSLO]

Uf, finally, here is code that I was needed THX all for help

#include <IE.au3>
$Uporabnik = "test"
$Pw = "test"

$OdpriIE = _IECreate("http://ikariam.si/", 0, 1, 1, 1)
$Form = _IEFormGetObjByName($OdpriIE, "loginForm")
$oElements = _IETagNameGetCollection ($OdpriIE, "input")
$_Uporabnik = _IEFormElementGetObjByName($Form, "name")
$_Pw = _IEFormElementGetObjByName($Form, "password")
_IEFormElementSetValue($_Uporabnik, $Uporabnik)
_IEFormElementSetValue($_Pw, $Pw)
Sleep(1000)
For $oElement In $oElements
    If String($oElement.value) = "Login" Then
        _IEAction($oElement, "Click")
    EndIf
    Next
Exit

[TerarinK]

You beat me at putting that up there first but here is another one to include

#include <IE.au3> 
Dim $sName = "Test", $sPassword = "Test"
$oIE = _IECreate("http://ikariam.si", 0, 1, 1, 1)
_Logon($oIE)

Func _Logon(ByRef $oObject)
    If Not IsObj($oObject) Then
        MsgBox(0, "Not Found", "No $oObject")
        SetError(1)
        Return -1
    EndIf
    
    $oElements = _IETagNameAllGetCollection($oObject)
    For $oElement In $oElements
        If StringInStr($oElement.Tagname, "Input") Then
            If StringInStr($oElement.Id, "login") Then
                $oEmail = $oElement
            ElseIf StringInStr($oElement.Id, "pwd") Then
                $oPassword = $oElement
            EndIf
        EndIf
    Next    

    _IEFormElementSetValue($oEmail, $sName)
    _IEFormElementSetValue($oPassword, $sPassword)

    _IEAction ($oPassword, "focus")
    
    ControlSend($oObject, "", "[CLASS:Internet Explorer_Server; INSTANCE:1]", "{Enter}")
    _IELoadWait($oObject)       
    Return 1
EndFunc

Use whatever one fits your liking

[MrSlo]

its possible to make it for check box? for agree terms?

thanx, Matys

[PsaltyDS]

its possible to make it for check box? for agree terms?

thanx, Matys

Dog ate your help file?

_IEFormElementCheckBoxSelect()