Working with IE windows

[BrewManNH]

Why use the outer loop at all in that case? Just get rid of the While loop completely because it's not needed. Then change the Exitloop 2 back to Exitloop without the count.

[Docfxit]

Why use the outer loop at all in that case? Just get rid of the While loop completely because it's not needed. Then change the Exitloop 2 back to Exitloop without the count.

That's great.  It's much easier to follow now.

Thank you,

Docfxit

[Docfxit]

It's continuing on to the rest of  the script long before the correct screen that I need to wait for is coming up.

There is text on the screen.  Is it posible to wait for the text?

"End-User License Agreement"

expandcollapse popup

#include <IE.au3>
#include <Array.au3>
#RequireAdmin

Opt("WinWaitDelay", 100)
Opt("WinTitleMatchMode", 4)
Opt("WinDetectHiddenText", 1)
Opt("MouseCoordMode", 0)
AutoItWinSetTitle(@ScriptName)
; AutoItSetOption("SendKeyDelay", 20)
AutoItSetOption("TrayIconDebug", 1) ;0-off
; Set so that tray displays current line number

If @OSVersion = 'Win_7' Then
    $ProgramFiles = "C:\Programs\"
Else
    $ProgramFiles = "C:\Program Files\"
EndIf

_IEErrorHandlerRegister()

Global $iTimer, $aWinList, $hWnd = 0
Global $oIE, $oChkBx

$SerialNumber = '0123456789'
Run('C:\Dnload\9xAddons\WordPerfect Office X6 v16.0.0.318\Setup.exe')
Local $var
Local $i = 1
$timer = TimerInit()
Do
    $var = WinList("WordPerfect Office X6")
    If $var[0][0] <> 0 Then
        MsgBox(0, "Title ", $var[$i][0])
        ExitLoop 2 ; if the window is found, exit both loops
    EndIf
    Sleep(100)
Until TimerDiff($timer) > 30000 ; thirty seconds
MsgBox(64, "", "Test 1")

;Accept EULA
$oIE.document.parentWindow.execScript('ShowSerialDialog();', "javascript")
While _IEPropertyGet($oIE, "busy")
    Sleep(100)
WEnd

Thanks,

Docfxit

Edited June 14, 2013 by Docfxit

[DW1]

After any action that's going to cause a new page to load, try using this loop to wait until the page has finished loading.

While _IEPropertyGet($oIE, "busy")
    Sleep(100)
WEnd