shoutbox über ie.au3 bedinen

  • hallo


    ich hab mit snoozer scon ewig daran rumgemacht meine shoutbox die ich zum zweitcomputer steuern benutzen will, zu bedinen...

    ...und alles was wir bis jetzt hinbekommen haben war das hier

    Spoiler anzeigen
    [autoit]

    #include<ie.au3>
    $oIE = _IECreate("http://178941.shoutbox.de/")
    $form = _IEFormGetCollection($oIE,0)
    $name = _IEFormGetObjByName($form,"ok")
    _IEAction($name,"click")
    _IEFormSubmit($form)

    [/autoit]

    hier mal der quelltext:

    Spoiler anzeigen
    [autoit]

    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

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

    <HTML>
    <HEAD>
    <!-- Shoutbox.de -->
    <TITLE>Shoutbox.de - FREE SHOUTBOX ! KOSTENLOSE SHOUTBOX ! GRATIS SHOUTBOX !</TITLE>
    <META http-equiv="content-type" CONTENT="text/html; CHARSET=ISO-8859-1">
    <META http-equiv="imagetoolbar" CONTENT="no">
    <META NAME="Googlebot" CONTENT="NOARCHIVE">
    <meta name="robots" content="noarchiv">
    <META NAME="Robots" CONTENT="INDEX,FOLLOW">
    <LINK REL="STYLESHEET" HREF="http://212.112.234.137/sbs/CSS/monitorgreen.css" TYPE="text/css">
    <style type="text/css">
    <!--
    HTML {overflow-x:hidden;}
    -->
    </style>

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

    <BASE target="_self">

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

    <script>
    <!--
    function SetEmo(emo){document.KV.YUhSMGN984B546002342554103428.value+=''+emo;document.KV.YUhSMGN984B546002342554103428.focus();}
    function cleanit(thefield){if(thefield.defaultValue==thefield.value){thefield.value="";};}
    function openWin(tURL,winName,attr){window.open(tURL,winName,attr);}
    function submitit(name){if (document.all||document.getElementById){for(i=0;i<name.length;i++){var tempobj=name.elements[i];if(tempobj.type.toLowerCase()=="submit"||tempobj.type.toLowerCase()=="reset"){tempobj.disabled=true;};};};}
    function doBlink(){var blink=document.all.tags("BLINK");for(var i=0;i<blink.length;i++){blink[i].style.visibility=blink[i].style.visibility==""?"hidden":"";};}
    function initBlink(){if(document.all){setInterval("doBlink()",550);};document.KV.NDYyODc1.value='WVRJME5XWXdaRGhtTlRnNVpUbFVWbEpxVGtVNVZWVllhRTFpYXpWMldXcE9WMDFHYkhSUFZGSk5ZbFpLYzFaR1dsTmhhelZHVDFaV1ZsY3hNRlJXVW1wT1JUbFZWVmhvVFdKck5YWlphazVYVFVac2RFOVVVazFpVmtwelZrWmFVMkZyTlVaUFZsWldWekF3VkZaU2FrNUZPVlZWV0doTlltczFkbGxxVGxkTlJteDBUMVJTVFdKV1NuTldSbHBUWVdzMVJrOVdWbFpYTVRjNE9UUXhWRlpTYWs1Rk9WVlZXR2hOWW1zMWRsbHFUbGROUm14MFQxUlNUV0pXU25OV1JscFRZV3MxUms5V1ZsWlg=';}
    function stoperror(){return true;}
    function delmake(endol,tstamp){var dol='ODQuNTcuMTUzLjEwNg=='; if((dol==endol)&&(tstamp>1181427107)){document.write("<BR>[ <A HREF='./?f=d&mid="+tstamp+"&LANG=DE&css=&extcss='>l&ouml;schen</A> ]");};}
    window.onerror=stoperror;

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

    function clickIE(){if(document.all){return false;};}
    function clickNS(e){if(document.layers||(document.getElementById&&!document.all)){if(e.which==2||e.which==3){return false;};};}
    if (document.layers){document.captureEvents(Event.MOUSEDOWN);document.onmousedown=clickNS;
    }else{document.onmouseup=clickNS;document.oncontextmenu=clickIE;}
    document.oncontextmenu=new Function("return false");
    //-->
    </script>
    </HEAD>
    <BODY LEFTMARGIN="0" TOPMARGIN="0" MARGINWIDTH="0" MARGINHEIGHT="0" ONLOAD="initBlink();window.scrollTo(0,99999);" style="overflow-x: hidden">

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

    <!-- c -->

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

    <TABLE cellpadding="2" cellspacing="0" "border=0" width="100%" class="SB_table1"><tr><td class="SB_shoutbox" title="09.06.2007 23.03.21"><b>snooozer</b>: test<script>delmake('ODguNzMuODYuMjc=','1181423001');</script></td></tr></TABLE>

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

    <!--SEMA_STREAM-->
    <FORM NAME="KV" ACTION="./" METHOD="POST" STYLE="display:inline;border:0px"><INPUT TYPE="hidden" NAME="f" VALUE="a"><INPUT TYPE="hidden" NAME="Y" VALUE="a"><INPUT TYPE="hidden" NAME="LANG" VALUE="DE"><INPUT TYPE="hidden" NAME="adou" VALUE="eB4f4ee5fc2A">

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

    <!-- /c -->

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

    <TABLE class="SB_formarea" width="100%">
    <TR>
    <TD><FONT class="SB_alert"></FONT>
    <DIV ALIGN="center"><script>document.writeln('<INPUT TYPE="text" NAME="TVRjNE9UUXhMbk5vYjNWMFltOTRMbVJs2ouidfgkajdf" size="22" MAXLENGTH="30" value="user" class="SB_input" onkeyup="refresh_nu()" onkeydown="refresh_nu()" title="Name"><BR><INPUT TYPE="text" NAME="YUhSMGN984B546002342554103428" size="22" MAXLENGTH="250" value="Nachricht" class="SB_input" onkeyup="refresh_nu()" onkeydown="refresh_nu()" title="Nachricht" ONFOCUS="cleanit(this);refresh_nu()"><br>');</script><INPUT TYPE="button" NAME="ok" value=":: senden" class="SB_button" ONCLICK="document.KV.submit();" ONSUBMIT="submitit(this)">&nbsp;<input type="reset" name="Submit2" value=":: reset" class="SB_button"><br><SPAN class="SB_shoutbox"><A HREF="javascript:void(0);" ONCLICK="openWin('./?f=p&LANG=DE&s=X','myshoutbox','scrollbars=yes,resizable=yes,width=303,height=605')">Archiv</A> - <A HREF="./?LANG=DE">®</A> <script>function refresh_nu(){return;};</script>-<A style="text-decoration:none" HREF="http://www.Shoutbox.de/">&nbsp;</A><A HREF="javascript:void(0);" ONCLICK="openWin('./?f=h&LANG=DE','help','scrollbars=yes,width=333,height=400')">Hilfe</A></SPAN><BR> </DIV></TD>

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

    </TR>
    </TABLE><INPUT TYPE="hidden" NAME="NDYyODc1" value=""></FORM>

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

    <!-- Shoutbox.de - 0.012632131576538 ms -->

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

    </BODY></HTML>

    [/autoit]

    was ich will ist einfach nur user und nachricht eingeben und senden drücken...

    ...und ich dachte ich hätte die ie.au3 verstanden :weinen:


    hat jemand ne idee wie man das anstellen könte?

    • Offizieller Beitrag

    Es würde funktionieren wenn es der richtige Befehl wäre!

    [autoit]

    #include <ie.au3>

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

    Const $c_szName = "Bernd"
    Const $c_szMsg = "Testnachricht"

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

    $oIE = _IECreate("http://178941.shoutbox.de/")

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

    $oForm = _IEFormGetCollection ($oIE,0)
    $oName = _IEFormElementGetObjByName($oForm,"TVRjNE9UUXhMbk5vYjNWMFltOTRMbVJs2ouidfgkajdf")
    $oMsg = _IEFormElementGetObjByName($oForm,"YUhSMGN984B546092342554103428")
    $oSubmit = _IEFormElementGetObjByName($oForm,"ok")

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

    _IEFormElementSetValue($oName,$c_szName)
    _IEFormElementSetValue($oMsg,$c_szMsg)
    _IEAction($oSubmit,"click")

    [/autoit][autoit][/autoit][autoit][/autoit]
  • hi bernd,
    das haben wir gestern auch getestet.....hat nur aus irgendwelcehn gründern NCIHT funktioniert...war ehrlich gesagt überfragt warum...deswegen war mein vorschlag das im forum zu posten^^

    ich kann das ganze so oder so nicht testen..zumindest nicht an meinem laptop..da hab ich vista mit IE7 da funktioniert ein teil der befehle nicht -.-
    noch andere möglichkeiten per rat??

    snoozer

    • Offizieller Beitrag

    Unter XP mit IE7 funktioniert es so wie ich es gepostet habe!

    Evtl. mal die Fehlermeldung posten!

  • hi bernd


    ich glaube das problem iist das die namen der shoutbox automatisch und immer neu generiert werden... nachher probier ich mal was mit stringregexp:)

    kanns jetzt aber nicht testen weil ich bei meim onkel bin...


    mfg

    • Offizieller Beitrag

    Das liegt natürlich im Bereich des möglichen, so ist es unabhängig vom Namen der Elemente!

    [autoit]

    #include <ie.au3>

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

    Const $c_szName = "Bernd"
    Const $c_szMsg = "Testnachricht"

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

    $oIE = _IECreate("http://178941.shoutbox.de/")
    $oForm = _IEFormGetCollection ($oIE,0)
    $oName = _IEFormElementGetCollection($oForm,4)
    $oMsg = _IEFormElementGetCollection($oForm,5)
    $oSubmit = _IEFormElementGetObjByName($oForm,"ok")

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

    _IEFormElementSetValue($oName,$c_szName)
    _IEFormElementSetValue($oMsg,$c_szMsg)
    _IEAction($oSubmit,"click")

    [/autoit]
  • hi bernd

    wenn das so geht muss ich dich ja garnichtmehr weiter mit regexp neven :D

    wie zähl ich eigendlich die "inputs" durch?


    mfg

    • Offizieller Beitrag

    Zum zählen kann man sich ein kleines Script schreiben:

    [autoit]

    #include <ie.au3>

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

    $oIE = _IECreate("http://178941.shoutbox.de/")

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

    $oForm = _IEFormGetCollection ($oIE,0)

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

    $oQuerys = _IEFormElementGetCollection ($oForm)
    $iNumQuerys = @extended
    MsgBox(0, "Info", "Es sind " & $iNumQuerys & " Elemente in dieser Form!")
    For $i = 0 to ($iNumQuerys - 1)
    $oQuery = _IEFormElementGetCollection ($oForm, $i)
    MsgBox(0, "Element Nr. " & $i, " Name = " & $oQuery.name)
    Next

    [/autoit]

    oder man zählt händisch, bei 0 beginnend, die Element in der Form!