Jump to content
Sign in to follow this  
KenzoIT

Open firefox

Recommended Posts

KenzoIT

Hi everyone,

I would like the script will execute automatically each five minutes.

But I have the problem when I run myscript. It can not stop.

$firefox = MsgBox(4, "Open Firefox", "Would you like to open firefox ?")

If $firefox = 7 Then
   ;MsgBox(0, "Design by Kenzo","Thank you !")
    Exit
EndIf

AdlibRegister ("Adlib_Function",4000)

While 1
ShellExecute ("C:\Program Files\Mozilla Firefox\firefox.exe")
    Sleep (1000)
    Send("{ALT}")
    Sleep(1000)
    Send ("{right 4}")
    Sleep (1000)
    Send("{down 9}")
    Send ("{right}")
    Send("{down 5}")
    Send("{enter}")
    Sleep(9000)
    Send("^{TAB}")
    Sleep(5000)
    Send("^{TAB}")
    Sleep(5000)
    Send("^{TAB}")
    Sleep(5000)
    Send("^{TAB}")
    Sleep(1000)

WEnd

Func Adlib_Function()
   ConsoleWrite("This function is called once a second - time is " & @MIN & ":" & @SEC & @CRLF)
EndFunc

Can you instruct me how to fix it ?

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  

×