Skip to content

Commit 5978385

Browse files
authored
Update NetWebView2Lib.au3
1 parent 1dd980f commit 5978385

1 file changed

Lines changed: 19 additions & 23 deletions

File tree

NetWebView2Lib.au3

Lines changed: 19 additions & 23 deletions
Original file line numberDiff line numberDiff line change
@@ -593,7 +593,7 @@ Func _NetWebView2_LoadWait($oWebV2M, $iWaitMessage = $NETWEBVIEW2_MESSAGE__TITLE
593593
ExitLoop
594594
EndIf
595595

596-
Local $bWebIsReady = $oWebV2M.IsReady ; RULE 1: If we reached the target status or higher
596+
Local $bWebIsReady = $oWebV2M.IsReady ; RULE 1: Check if browser IsReady
597597
If @error Then ; browser/COM error ?
598598
$ERR = 1
599599
$RET = False
@@ -607,41 +607,37 @@ Func _NetWebView2_LoadWait($oWebV2M, $iWaitMessage = $NETWEBVIEW2_MESSAGE__TITLE
607607
ContinueLoop ; For navigation events, ensure the browser reports IsReady
608608
EndIf
609609

610-
; RULE 4: checking browser ReadyState
610+
; RULE 4: checking browser DOM ReadyState
611611
Local $iLastMessage = -1
612612
Local $sReadyState = _NetWebView2_ExecuteScript($oWebV2M, "document.readyState", $NETWEBVIEW2_EXECUTEJS_MODE2_RESULT)
613-
If @error Then
614-
$ERR = 7
613+
If @error Then ; RULE 4: checking ready state - DOM should not fire event
614+
$ERR = 3
615615
$RET = False
616616
$MSG = " document.readyState execution Error" & " #SLN=" & @ScriptLineNumber
617617
ExitLoop
618-
ElseIf StringLeft($sReadyState, 6) == "ERROR:" Then
619-
$ERR = 8
618+
ElseIf StringLeft($sReadyState, 6) == "ERROR:" Then ; RULE 4: checking ready state JavaScript result on case of error
619+
$ERR = 4
620620
$RET = False
621621
$MSG = " document.readyState execution Error" & " #SLN=" & @ScriptLineNumber
622622
ExitLoop
623-
ElseIf $sReadyState = "complete" Then
624-
; RULE 5: checking events messages
623+
ElseIf $sReadyState = "complete" Then ; RULE 4: checking browser DOM ReadyState is "complete"
625624
$iLastMessage = __NetWebView2_LastMessage_Navigation($oWebV2M)
626625
If $_g_bNetWebView2_DebugDev Then ConsoleWrite("! IFNC: DEV: TEST LOAD WAIT: ReadyState=" & $sReadyState & " LastMessage=" & $iLastMessage & " WaitMessage=" & $iWaitMessage & " #SLN=" & @ScriptLineNumber & @CRLF)
627-
If $iLastMessage = $NETWEBVIEW2_MESSAGE__NAV_ERROR Or $iLastMessage = $NETWEBVIEW2_MESSAGE__PROCESS_FAILED Or $iLastMessage = $NETWEBVIEW2_MESSAGE__CRITICAL_ERROR Then
626+
If $iLastMessage = $NETWEBVIEW2_MESSAGE__NAV_ERROR Or $iLastMessage = $NETWEBVIEW2_MESSAGE__PROCESS_FAILED Or $iLastMessage = $NETWEBVIEW2_MESSAGE__CRITICAL_ERROR Then ; RULE 5: messages of specific Error occurs
628627
If $_g_bNetWebView2_DebugDev Then ConsoleWrite("! IFNC: DEV: TEST LOAD WAIT: " & $iLastMessage & " #SLN=" & @ScriptLineNumber & @CRLF)
629-
$ERR = 3
628+
$ERR = 5
630629
$RET = False
631630
ExitLoop
632-
ElseIf $iLastMessage >= $iWaitMessage Then ; checking events
633-
; RULE 6: checking document title
634-
If $sExpectedTitle Then
635-
If $iWaitMessage = $NETWEBVIEW2_MESSAGE__TITLE_CHANGED Then
636-
Local $sCurrentTitle = $oWebV2M.GetDocumentTitle()
637-
Local $bTitleCheck = (StringRegExp($sCurrentTitle, $sExpectedTitle, $STR_REGEXPMATCH) = 1)
638-
Local $s_DEV_Info = "! IFNC: DEV: TEST LOAD WAIT: Prefix:: " & $s_Prefix & " TitleCheck=" & $bTitleCheck & " LastMessage=" & $iLastMessage & " CurrentTitle=" & $sCurrentTitle
639-
If $_g_bNetWebView2_DebugDev Then ConsoleWrite($s_DEV_Info & " #SLN=" & @ScriptLineNumber & @CRLF)
640-
If $bTitleCheck Then
641-
$MSG = " TitleCheck=" & $bTitleCheck & " #SLN=" & @ScriptLineNumber
642-
$RET = True
643-
ExitLoop
644-
EndIf
631+
ElseIf $iLastMessage >= $iWaitMessage Then ; RULE 6: checking requested events messages
632+
If $iWaitMessage = $NETWEBVIEW2_MESSAGE__TITLE_CHANGED And $sExpectedTitle Then ; RULE 7: checking Expected document title - only if $NETWEBVIEW2_MESSAGE__TITLE_CHANGED was choosed
633+
Local $sCurrentTitle = $oWebV2M.GetDocumentTitle()
634+
Local $bTitleCheck = (StringRegExp($sCurrentTitle, $sExpectedTitle, $STR_REGEXPMATCH) = 1)
635+
Local $s_DEV_Info = "! IFNC: DEV: TEST LOAD WAIT: Prefix:: " & $s_Prefix & " TitleCheck=" & $bTitleCheck & " LastMessage=" & $iLastMessage & " CurrentTitle=" & $sCurrentTitle
636+
If $_g_bNetWebView2_DebugDev Then ConsoleWrite($s_DEV_Info & " #SLN=" & @ScriptLineNumber & @CRLF)
637+
If $bTitleCheck Then
638+
$MSG = " TitleCheck=" & $bTitleCheck & " #SLN=" & @ScriptLineNumber
639+
$RET = True
640+
ExitLoop
645641
EndIf
646642
Else
647643
If $_g_bNetWebView2_DebugDev Then ConsoleWrite($s_DEV_Info & " #SLN=" & @ScriptLineNumber & @CRLF)

0 commit comments

Comments
 (0)