IEFormSubmit .. Problem

  • hallöchen in die runde,

    ich sitze nun schon seit paar tagen an meinem "routerreset" prog für meinen DI-624 und komme bei dem IEFormSubmit nicht weiter.

    hier dier code:

    Spoiler anzeigen
    [autoit]

    $o_IE=_IECreate("http://192.168.0.1",0,1,0,1)
    sleep(1500)
    If WinActive("Verbindung zu 192.168.0.1 herstellen","") Then
    ControlSend ("Verbindung zu 192.168.0.1 herstellen","","Edit2","admin")
    ControlSend ("Verbindung zu 192.168.0.1 herstellen","","Edit3","xxxxxxx")
    ControlClick("Verbindung zu 192.168.0.1 herstellen","","Button2")
    _IELoadWait($o_IE)
    EndIf
    _IENavigate($o_IE,"http://192.168.0.1/st_device.html")
    $oForm =_IEFormGetObjByName($o_IE,"form1")
    $oDiscon= _IEGetObjByName($oForm,"disconnect")
    _IEFormElementSetValue ($oDiscon, "Disconnect")
    _IEFormSubmit ($oForm,0)

    [/autoit]

    der quellcode von dieser seite :

    Spoiler anzeigen

    <HTML>
    <HEAD>
    <TITLE>DI-624</TITLE>
    <META HTTP-EQUIV=Content-Type CONTENT="text/html; charset=iso-8859-1">
    <script language="JavaScript" src="public.js"></script>
    </HEAD>
    <BODY BGCOLOR=#FFFFFF leftmargin=0 topmargin=0>
    <table width=75% border=0 cellspacing=0 cellpadding=0 align=center>
    <tr>
    <td>
    <div align=center><img src=home_01.jpg width=765 height=95 usemap=#Map2 border=0></div>
    </td>
    </tr>
    <tr>
    <td height=721>
    <table width=765 border=0 cellpadding=0 cellspacing=0 align=center>
    <tr>
    <td rowspan=8 width=20 background=down_01.gif>&nbsp;</td>
    <td rowspan=2 width=133><img src=down_02.jpg width=133 height=75></td>
    <td rowspan=2 width=25 background=down_03.jpg>&nbsp;</td>
    <td width=21><img src=status_04.jpg width=21 height=49></td>
    <td width=522><img src=status_05.jpg width=522 height=49 usemap=#MapMap border=0></td>
    <td width=19><img src=down_06.jpg width=19 height=49></td>
    <td width=25 background=down_11.gif>&nbsp;</td>
    </tr>
    <tr>
    <td width=21 background=down_14.gif>&nbsp;</td>
    <td rowspan=7 width=522 valign=top>
    <form id="form1" name="form1" method="post" action="st_device.cgi">
    <table width=100% border=0 cellspacing=2 cellpadding=0>
    <tr>
    <td colspan=2 height=15><font face="Arial, Helvetica, sans-serif" color=#8bacb1 size=2><b>Device
    Information</b></font></td>
    </tr>
    <tr>
    <td colspan=2 height=20>
    <div align=center><font face="Arial, Helvetica, sans-serif"><b><font face=Arial size=2>Firmware
    Version:</font>
    2.52
    ,
    Fri, 22 Oct 2004
    </b></font></div>
    </td>
    </tr>
    <tr bgcolor=#CCCCCC>
    <td colspan=2>
    <div align=left><font face=Arial size=2 color=#000000>LAN</font></div>
    </td>
    </tr>
    <tr>
    <td width=22% height=25>
    <div align=right><font color=#000000><b><font face=Arial size=2>MAC
    Address&nbsp;</font></b></font></div>
    </td>
    <td width=78% height=25><font size=2 face=Arial>
    00-11-95-07-EC-24
    </font></td>
    </tr>
    <tr>
    <td width=22% height=25>
    <div align=right><font color=#000000><b><font size=2 face=Arial>IP
    Address&nbsp;</font></b></font></div>
    </td>
    <td width=78% height=25><font size=2 face=Arial>
    192.168.0.1
    </font></td>
    </tr>
    <tr>
    <td width=22% height=25>
    <div align=right><font color=#000000><b><font face=Arial size=2>Subnet
    Mask&nbsp;</font></b></font></div>
    </td>
    <td width=78% height=25><font size=2 face=Arial>
    255.255.255.0
    </font></td>
    </tr>
    <tr>
    <td width=22% height=25>
    <div align=right><font color=#000000><b><font size=2 face=Arial>DHCP
    Server&nbsp;</font></b></font></div>
    </td>
    <td width=78% height=25><font size=2 face=Arial>
    Enabled
    </font></td>
    </tr>
    <tr>
    <td width=22% height=25>&nbsp;</td>
    <td width=78% height=25>&nbsp;</td>
    </tr>
    <tr>
    <td colspan=2 bgcolor=#CCCCCC><font face=Arial size=2>WAN</font></td>
    </tr>
    <tr>
    <td width=22% height=25>
    <div align=right><font color=#000000><b><font face=Arial size=2>MAC
    Address&nbsp;</font></b></font></div>
    </td>
    <td width=78% height=25><font face=Arial size=2>
    00-11-95-07-EC-25
    </font></td>
    </tr>
    <tr>
    <td width=22% height=25>
    <div align=right><font color=#000000><b><font face=Arial size=2>Connection&nbsp;</font></b></font></div>
    </td>
    <td width=78% height=25><font face=Arial size=2>
    PPPoE Connected <input type=submit name="connect" value="Connect">&nbsp;<input type=submit name="disconnect" value="Disconnect">
    </font></td>
    </tr>...........

    nach dem befehl _IEFormSubmit ($oForm,0) erscheint zwar wie üblich die folgeseite mit dem "continue", aber ein reset bzw. disconnect wurde nicht durchgeführt. im scite-fenster gibt es auch keine fehlermeldungen. was mache ich denn hier falsch ?

    vielen dank im voraus für die hilfe.

    gruss exberliner

  • hi,

    befindet sich die Seite evtl. in ein Frameset?

    ... statt submit könntest Du es auch so versuchen ...

    [autoit]


    $oForm =_IEFormGetObjByName($o_IE,"form1")
    $oDiscon= _IEGetObjByName($oForm,"disconnect")
    $oDiscon.click()

    [/autoit]

    ... oder einfach folgende Zeilen weglassen, die brauchst Du eigentlich nicht, und ich bin mir nicht sicher was die "setValue"-Funktion anrichtet ;)

    [autoit]


    $oDiscon= _IEGetObjByName($oForm,"disconnect")
    _IEFormElementSetValue ($oDiscon, "Disconnect")

    [/autoit]

    EDIT:
    Du könntest auch sniffern was der Browser macht wenn Du "disconnect" manuell anklickst, und dann die URL per $oIE.navigate aufrufen.

    2 Mal editiert, zuletzt von jonk (15. April 2007 um 14:08)

  • @ jonk

    merci. wär ich nie drauf gekommen.
    die lösung war:

    [autoit]

    $oForm =_IEFormGetObjByName($o_IE,"form1")
    $oDiscon= _IEGetObjByName($oForm,"disconnect")
    $oDiscon.click()

    [/autoit]

    vielen dank.
    gruss exberliner