Как сделать чтобы если есть окно то не создавать больше окон?

[Pennon]

Здравствуйте, хочу в заданное время создать окно IE и потом в заданное время закрыть все IE.
Как сделать чтобы если есть окно то не создавать больше окон и чтобы время закрытия окон каждый день отличалось на случайное количество минут(10-15)

#include <IE.au3>
HotKeySet("{ESC}", "_Exit")
$sUrl = 'about:blank'
While 1
If @HOUR*60+@MIN >= 21*60+10 And @HOUR*60+@MIN <= 21*60+11 Then
  ; If Not IsObj ($oIE) Then
$oIE = _IECreate($sUrl)
EndIf

If @HOUR*60+@MIN >= 2*60+28 And @HOUR*60+@MIN <= 2*60+29 Then
  While WinClose("[class:IEFrame]")
WEnd

EndIf
WEnd

 

[ra4o]

если есть окно

WinExists ( "title" [, "text" ] )

случайное количество минут(10-15)

Random ( 10 ,15 , 1)

 

[Pennon]

ra4o
Спасибо, что-то с WinExists не получилось а получилось через WinWait
Но в заданное время не закрывает окон. что не так?

#include <IE.au3>
HotKeySet("{ESC}", "_Exit")
$sUrl = 'about:blank'
While 1
If @HOUR*60+@MIN >= 21*60+10 And @HOUR*60+@MIN <= 21*60+11 Then
    $hWnd = WinWait("[class:IEFrame]", "", 5)
    If Not $hWnd Then
$oIE = _IECreate($sUrl)
EndIf
EndIf

If @HOUR*60+@MIN >= 1*60+42 And @HOUR*60+@MIN <= 1*60+55 Then
   
  While WinClose("[class:IEFrame]")
WEnd
EndIf
EndIf
WEnd

 

[ra4o]

Вот так должно закрыть все окна IE

While WinExists("[class:IEFrame]")
	WinClose("[class:IEFrame]")
	Sleep(200);Ставьте небольшую задержку в цикл.
WEnd

Вот так , если нет окон IE, то создаст новое, если есть - то создавать не будет:

Спойлер

#include <IE.au3>
HotKeySet('{ESC}', '_Exit')
$sUrl = 'about:blank'

While 1

If Not WinExists('[class:IEFrame]') Then
	$oIE = _IECreate($sUrl)
    $hWnd = WinWait('[class:IEFrame]', '', 10)
EndIf
sleep(200)
WEnd

Func _Exit()
	WinClose('[class:IEFrame]')
	Exit
EndFunc

 

[Pennon]

ra4o
Спасибо работает но грузит систему на 100% Что сделать чтобы между действиями не загружал процессор?

 

[Garrett]

Pennon [?]

не загружал процессор?

While 1

If Not WinExists('[class:IEFrame]') Then
    $oIE = _IECreate($sUrl)
    $hWnd = WinWait('[class:IEFrame]', '', 10)
EndIf
Sleep(30)
WEnd

 

[ra4o]

Или дописать паузу в бесконечный цикл (исправил в предыдущем сообщении)