Sign in to follow this  
Followers 0
EmEx

Help with Banner clicker

4 posts in this topic

Hi,

i need help with a simple banner clicker in the IE

thats what i have

;~ HotKeySet( "{F10}" , "_Stop")
#include <IE.au3>
HotKeySet("{F10}", "_exit")
HotKeySet("{F11}", "_start")

ToolTip("Lose5er auto Banner klicker. Press F10 to stop the script ", 10, 10)

call("_start")


Func _exit()
Exit 1
EndFunc

Opt("TrayMenuMode", 1)
Opt("WinTitleMatchMode", 2)

Opt("TrayOnEventMode",1)
TraySetState()
TrayTip("Lose5er auto Banner klicker", "Starting in 5 secs, Press F10 to stop script", 5, 1)


Func _start()
    
sleep (500)

While(1)

sleep (500)
Run('D:/Programme/Internet Explorer/iexplore.exe www.lose5er.de ')
WinSetState("Windows Internet Explorer", "", @SW_MAXIMIZE)
WinActivate("Windows Internet Explorer", "")
WinSetState("Windows Internet Explorer", "", @SW_MAXIMIZE)
sleep (5000)
WinSetState("Windows Internet Explorer", "", @SW_MAXIMIZE)
WinActivate("Windows Internet Explorer", "")
WinSetState("Windows Internet Explorer", "", @SW_MAXIMIZE)
MouseClick("left", 210,420, 1)
sleep (100)
Send ("ID-Number")
sleep (100)
Send("{TAB}")
sleep (100)
Send("PW")
sleep (100)
Send("{ENTER}")
For $a = 1 to 30 Step 1
    
sleep (1000)
Run('D:/Programme/Internet Explorer/iexplore.exe www.lose5er.de/member/galerie_frame_forced_aa.php ')
sleep (3000)
WinSetState("Galerie - Windows Internet Explorer", "", @SW_MAXIMIZE)


For $i = 1 to 3 Step 1
sleep (12000)
WinSetState("Galerie - Windows Internet Explorer", "", @SW_MAXIMIZE)
WinActivate("Galerie - Windows Internet Explorer", "")
WinSetState("Galerie - Windows Internet Explorer", "", @SW_MAXIMIZE)
sleep (500)
WinSetState("Galerie - Windows Internet Explorer", "", @SW_MAXIMIZE)
WinSetState("Galerie - Windows Internet Explorer", "", @SW_MAXIMIZE)
WinSetState("Galerie - Windows Internet Explorer", "", @SW_MAXIMIZE)
WinActivate("Galerie - Windows Internet Explorer", "")
ControlClick ("Galerie - Windows Internet Explorer","", "Internet Explorer_Server1", "", "", 747, 42)
sleep (500)

Next

ProcessClose("iexplore.exe")
sleep (500)
ProcessClose("iexplore.exe")
sleep (500)
ProcessClose("iexplore.exe")
sleep (500)

Next

WEnd

EndFunc

My problems are the controlclick and mouseclick.

mouseclick work but i will make it with controlclick and that dosnt work, why?

Share this post


Link to post
Share on other sites



ControlClick ("Galerie - Windows Internet Explorer","", "Internet Explorer_Server1", "", "", 747, 42)
Which mouse button is it clicking? How many times is it clicking? I think you're missing some information in your parameters.

Share this post


Link to post
Share on other sites

Which mouse button is it clicking? How many times is it clicking? I think you're missing some information in your parameters.

button and clicks are defaulvalues

button left and clicks 1.

But i test it and i think it works.

br EmEx

Share this post


Link to post
Share on other sites

In the code you posted they are not default values, they are blanks. With some functions leaving a parameter blank uses the default value, this function does not behave that way. This function does not even support the Default keyword.

I tested it myself with the Taskbar properties window (right click on Taskbar -> Properties)

These did not work:

ControlClick('Taskbar and Start Menu', '', 'Cancel', '', '')

ControlClick('Taskbar and Start Menu', '', 'Cancel', Default, Default)

This worked:

ControlClick('Taskbar and Start Menu', '', 'Cancel', 'left', 1)

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0