Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   AutoIt (http://forum.oszone.net/forumdisplay.php?f=103)
-   -   [решено] Нажать на банер в IE (http://forum.oszone.net/showthread.php?t=152841)

rimm 10-10-2009 19:52 1239561
Нажать на банер в IE
 
Необходимо нажать на несколько банеров находящихся на одной странице

Код:
<p><br /><br /><h3 align="center">Bezahlte Banneraufrufe</h3></p>
2345
<p align="center">Hier kannst du durch Klicks auf die Werbung verdienen!<br />
Der Verdienst und die Reloadsperre steht unter den Bannern.<br />
Der Klickpott betr&auml;gt aktuell 20889650.00 lose<br />
Es sind noch <span id="count">5</span> Banner zum Klicken auf dieser Seite! (5
max. pro Seite)</p>

<div id="banner_183950">
<p align="center">
        <a href="page.php?cat=paid4&amp;p=banner&amp;u=click&amp;id=183950&amp;type=lose4wm" onclick="hide('banner_183950');" target="_blank">

<img src="http://www.lose4webmaster.de/lose/forcedviewbanner.php?id=1192&bid=183950&aid=2677" alt="Banner_183950" width="468" height="60" /></a><br />
        <font color="green">Verdienst: 600.00 lose</font>, <font color="orange">Mindestaufenthalt: 15s</font>, <font color="darkred">Sperre: 2 Stunden</font>
</p>
</div>
<div id="banner_183758">
<p align="center">
        <a href="page.php?cat=paid4&amp;p=banner&amp;u=click&amp;id=183758&amp;type=lose4wm" onclick="hide('banner_183758');" target="_blank">

<img src="http://www.lose4webmaster.de/lose/forcedviewbanner.php?id=1192&bid=183758&aid=2677" alt="Banner_183758" width="468" height="60" /></a><br />

        <font color="green">Verdienst: 600.00 lose</font>, <font color="orange">Mindestaufenthalt: 15s</font>, <font color="darkred">Sperre: 24 Stunden</font>
Жирным шрифтом изменяющиеся параметры
<a href="page.php?cat=paid4&amp;p=banner&amp;u=click&amp;id=183758&amp;type=lose4wm" onclick="hide('banner_183758');" target="_blank">

Буду рад любой помощи

HORRIBLE 12-10-2009 12:23 1240739
Проверить на деле не получилось, не получилось найти эту страницу на этом сайте.
Код:
#Include <Array.au3>
#include <IE.au3>

$oIE = _IECreate("")
$Html = _IEDocReadHTML($oIE)
;MsgBox(0,"",$HTML)
$banner_digit = StringRegExp($HTML,'(?s).*?<DIV id=.*?banner_(\d*).*?>',3)
_ArrayDisplay($banner_digit,"")
    If @error = 0 Then
        For $i = 0 to Ubound($banner_digit)
              _IEImgClick($oIE, "Banner_"&$banner_digit[$i], "alt")
        next
    Else
        MsgBox(0,@error,"Баннеров не найдено")
    EndIf

rimm 22-10-2009 15:40 1249594
Простите что отвечаю поздно..(был в командировке)

Спасибо HORRIBLE все работает..


Время: 03:17.

Время: 03:17.
© OSzone.net 2001-