Script Doesn't stay open long enough to use!

[NELyon]

HotKeySet("z","KillPopups")
Func KillPopups()
If WinExists("- Microsoft Internet Explorer") Then WinKill("- Microsoft Internet Explorer")
EndFunc

I just want to use this to close all IE windows when i press "z" but the script terminates inself as soon as it is run. can anyone help?

[SmOke_N]

  codemyster said:

HotKeySet("z","KillPopups")
Func KillPopups()
If WinExists("- Microsoft Internet Explorer") Then WinKill("- Microsoft Internet Explorer")
EndFunc

[NELyon]

That works but it doesen't keep the program open long enough to be of use.

[sd333221]

HotKeySet("z","KillPopups")

While 1
Sleep(300)
Wend

Func KillPopups()
If WinExists("- Microsoft Internet Explorer") Then WinKill("- Microsoft Internet Explorer")
EndFunc

try this

Edited June 9, 2006 by sd333221

[SmOke_N]

I had no idea that was your "whole" script, yes, sd333221 hit the nail on the head, you must at least have a loop to hold it doing something until you hit 'z'

[elgabionline]

  Quote

I just want to use this to close all IE windows when i press "z" but the script terminates inself as soon as it is run. can anyone help?

You should insert a loop:

HotKeySet("z","KillPopups")

while 1
sleep (1)
wend

Func KillPopups()
If WinExists("- Microsoft Internet Explorer") Then WinKill("- Microsoft Internet Explorer")
EndFunc

[sd333221]

  elgabionline said:

You should insert a loop:

HotKeySet("z","KillPopups")

while 1
sleep (1)
wend

Func KillPopups()
If WinExists("- Microsoft Internet Explorer") Then WinKill("- Microsoft Internet Explorer")
EndFunc

please remember that a

sleep(1)

could cause a 100% cpu usage very fast. Take

sleep(300)

Edited June 9, 2006 by sd333221

[NELyon]

...thats a pretty small loop... testing...

why won't it work i wonder...

[sd333221]

  codemyster said:

...thats a pretty small loop... testing...

why won't it work i wonder...

because without a loop, it only checks 1 time if the hotkey is pressed and if not,

the program is finished and it shuts down.

the loop holds the program running and waiting for the hotkey to be pressed

[NELyon]

yeah... ok i am getting the program to stay open. but it still wont kill the IE windows. here's the whole code i'm using:

while 1
sleep (300)
wend

HotKeySet("z","KillPopups")


Func KillPopups()
If ProcessExists('iexplore.exe') Then ProcessClose('iexplore.exe')
EndFunc

Edited June 9, 2006 by codemyster

[elgabionline]

  codemyster said:

yeah... ok i am getting the program to stay open. but it still wont kill the IE windows. here's the whole code i'm using:

while 1
sleep (300)
wend

HotKeySet("z","KillPopups")
Func KillPopups()
If ProcessExists('iexplore.exe') Then ProcessClose('iexplore.exe')
EndFunc

Put hotkeyset on top. That shoul be work....

[NELyon]

Nope. still doesn't work.

[bucky002]

You could probably do this

HotKeySet("z","KillPopups")


while 1
sleep (300)
wend

Func KillPopups()
If ProcessExists('iexplore.exe') Then 
ProcessClose('iexplore.exe')
Endif
EndFuncoÝ÷ Ù8b²ÞÂ䱫­¢+Ù!½Ñ-åMÐ ÅÕ½ÐíèÅÕ½Ðì°ÅÕ½Ðí-¥±±A½ÁÕÁÌÅÕ½Ðì¤)=ÁÐ ÅÕ½Ðí]¥¹Q¥Ñ±5Ñ¡5½ÅÕ½Ðì°È¤)]¡¥±Ä)M±À ÌÀÀ¤)]¹()Õ¹-¥±±A½ÁÕÁÌ ¤)%]¥¹á¥ÍÑÌ ÅÕ½Ðì´5¥É½Í½Ð%¹ÑɹÐáÁ±½ÉÈÅÕ½Ðì¤Q¡¸(%]¥¹
±½Í ÅÕ½Ðì´5¥É½Í½Ð%¹ÑɹÐáÁ±½ÉÈÅÕ½Ðì¤)¹%$)¹Õ¹

Note: You were missing "EndIF" in both of them

Edited June 9, 2006 by bucky002

[SmOke_N]

  codemyster said:

Nope. still doesn't work.

The way you have it set up, looks like it will only close 1 window at a time. Why not just use the ProcessExists()/ProcessClose() option I said in that function?

[NELyon]

I am using the ProcessExists thing

[elgabionline]

  codemyster said:

Nope. still doesn't work.

Sure you are using a Internet Explorer window, not Mozilla or Opera?

Then try with this:

#include <misc.au3>

while 1
sleep (300)
if _ispressed ("5A") then KillPopups ()
wend

Func KillPopups()
If ProcessExists('iexplore.exe') Then ProcessClose('iexplore.exe')
EndFunc

[SmOke_N]

  codemyster said:

I am using the ProcessExists thing

This worked:

HotKeySet("z","KillPopups")

While 1
    Sleep(1000)
WEnd

Func KillPopups()
    If ProcessExists('iexplore.exe') Then
        Do
            ProcessClose('iexplore.exe')
        Until Not ProcessExists('iexplore.exe')
    EndIf
EndFunc

[bucky002]

This will close them all.

HotKeySet("z","KillPopups")


while 1
sleep (300)
wend

Func KillPopups()
    While 1
If ProcessExists('iexplore.exe') Then
ProcessClose('iexplore.exe')
Endif
WEnd
EndFunc

[SmOke_N]

  bucky002 said:

This will close them all.

HotKeySet("z","KillPopups")
while 1
sleep (300)
wend

Func KillPopups()
    While 1
If ProcessExists('iexplore.exe') Then
ProcessClose('iexplore.exe')
Endif
WEnd
EndFunc

Bucky, with that example you never leave your loop..

While ProcessExists('iexplore.exe')
    ProcessClose('iexplore.exe')
WEnd

Is more like it I think

Edit:

Or the example I gave with the Do/Until

Edited June 9, 2006 by SmOke_N

[NELyon]

  SmOke_N said:

This worked:

HotKeySet("z","KillPopups")

While 1
    Sleep(1000)
WEnd

Func KillPopups()
    If ProcessExists('iexplore.exe') Then
        Do
            ProcessClose('iexplore.exe')
        Until Not ProcessExists('iexplore.exe')
    EndIf
EndFunc

Oh my gosh thank you! That works perfectly!