@@ -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