Comm Error: Help with an error Message

[CaptainBeardsEyesBeard]

Hey i get this in my console 

 

Starting to attempt to click 2nd next buttonStarting for loop for 2nd next button

Starting for loop for dropdown--> IE.au3 T3.0-2 Warning from function _IEGetObjById, $_IESTATUS_NoMatch (Client_WhoIntroducedUS)
--> IE.au3 T3.0-2 Error from function _IEFormElementSetValue, $_IESTATUS_InvalidDataType

$ObjID equals the following: "H:\Quality Assurance\GenericFunctions\GenericFunctions.au3" (246) : ==> The requested action with this object has failed.:
ConsoleWrite(@CRLF  & "Testing expected object: " & $ObjExpected & " .Against ObjID.Value: " & $ObjID.Value )
ConsoleWrite(@CRLF  & "Testing expected object: " & $ObjExpected & " .Against ObjID.Value: " & $ObjID^ ERROR

Edit: Ignore this bit as the actual error point is in the 2nd post below this And if I double click the yellow error line it takes me to the attached picture of code 

 

The full code being here

expandcollapse popup

;/****************************Due Digilgence Assesement Screen***************************************/
Sleep(8000)
_IELoadWait($oIE)

;set dropdown
ConsoleWrite(@CRLF & "Starting for loop for dropdown")
$oButtons = _IETagNameGetCollection($oIE, "input")
Sleep(4000)

If IsObj($oButtons) Then
    For $oButton In $oButtons
        If $oButton.getAttribute("placeholder") = "Select a practice area" Then
            MsgBox(64, ' Button Found', 'Button found with value: ' & $oButton.getAttribute("value"), 2)
      _IEFormElementSetValue($oButton, "BAG - Co Comm Bristol" )
               Sleep(2000)
               $oButton.focus
               Send("{Enter}")
            ExitLoop
        EndIf
    Next
EndIf

;Get IDs of the boxes on this screen
$Client_WhoIntroducedUSID  = _IEGetObjByID($oIE, "Client_WhoIntroducedUS")
$Client_IndividualsWithSignificantHoldingsID = _IEGetObjByID($oIE,"Client_IndividualsWithSignificantHoldings")
$Client_ClientInstructionsID = _IEGetObjByID($oIE,"Client_ClientInstructions")
$Client_TransactionValuesID = _IEGetObjByID($oIE,"Client_TransactionValues")
$Client_WhyConfidentClientCanPayID = _IEGetObjByID($oIE,"Client_WhyConfidentClientCanPay")
If @error then
      ConsoleWrite(@CRLF & "Error trying to _IEGetObjByID on  following web ID: Client_WhyConfidentClientCanPay")

      EndIf
$Client_WhyNotHadFaceToFaceID = _IEGetObjByID($oIE, "Client_WhyNotHadFaceToFace")
$Client_SourceOfFundsID = _IEGetObjByID($oIE,"Client_SourceOfFunds")
If @error then
      ConsoleWrite(@CRLF & "Error trying to _IEGetObjByID on  following web ID: $Client_SourceOfFundsID")

      EndIf


;Input data of the boxes
_IEFormElementSetValue($Client_WhoIntroducedUSID, "Testing field ID Client_WhoIntroducedUS. Random no: " & Random(1,10000, 1))
_IEFormElementSetValue($Client_IndividualsWithSignificantHoldingsID, "Testing field ID Client_IndividualsWithSignificantHoldings Random no: " & Random(1,10000, 1))
 If @error then
      ConsoleWrite(@CRLF & "Error trying to _IEFormElementSetValue on  following web ID: Client_IndividualsWithSignificantHoldings")

      EndIf
_IEFormElementSetValue($Client_ClientInstructionsID, "Testing field ID Client_ClientInstructions Random no: " & Random(1,10000, 1))
_IEFormElementSetValue($Client_TransactionValuesID, "Testing field ID Client_TransactionValues Random no: " & Random(1,10000, 1))
_IEFormElementSetValue($Client_SourceOfFundsID, "Testing field ID Client_SourceOfFunds Random no: " & Random(1,10000, 1))
_IEFormElementSetValue($Client_WhyConfidentClientCanPayID, "Testing field ID Client_WhyConfidentClientCanPay Random no: " & Random(1,10000, 1))

;Test that data has been input
Sleep(3000)
;  Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_WhoIntroducedUSID, "Ensure $Client_WhoIntroducedUSID is correctly input into field ")
;  Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_IndividualsWithSignificantHoldingsID, "Ensure $Client_IndividualsWithSignificantHoldingsID is correctly input into field ")
;  Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_ClientInstructionsID, "Ensure $Client_ClientInstructionsID is correctly input into field ")
;  Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_TransactionValuesID, "Ensure $Client_TransactionValuesID is correctly input into field ")
;  Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_SourceOfFundsID, "Ensure $Client_SourceOfFundsID is correctly input into field ")
;  Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_WhyConfidentClientCanPayID, "Ensure $Client_WhyConfidentClientCanPayID is correctly input into field ")
;  Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_WhoIntroducedUSID, "Ensure $Client_WhoIntroducedUSID is correctly input into field ")

$WhyNotHadFaceToFaceDropdown = "No"

If $WhyNotHadFaceToFaceDropdown == "No" Then
   $Client_WhyNotHadFaceToFaceID = _IEGetObjByID($oIE, "Client_WhyNotHadFaceToFace")
   _IEFormElementSetValue($Client_WhyNotHadFaceToFaceID, "Testing field ID Client_WhyNotHadFaceToFace Random no: " & Random(1,10000, 1))
   Check_A_Field_Contains_In_InternetExplorer($ClientReferringPartnerID, $Client_WhyNotHadFaceToFaceID, "Ensure $Client_WhyNotHadFaceToFaceID is correctly input into field ")

   Endif



;To Do - Change drop downs

; Click Next

Sleep(4000)
;below function in Generic Fucntions
ConsoleWrite("Starting for loop for 2nd next button on Due Digilgence Assesement Screen" & @CRLF)
$oButtons = _IETagNameGetCollection($oIE, "input")
Sleep(4000)
If IsObj($oButtons) Then
    For $oButton In $oButtons
        If $oButton.getAttribute("value") = "Next" Then
            MsgBox(64, ' Button Found', 'Button found with value: ' & $oButton.getAttribute("value"), 2)
            _IEAction($oButton, 'click')

            ExitLoop
        EndIf
    Next
EndIf

 

What is weird is that after the error line it seems to execute that code as it enters all the data on the IEFormsetvalue bits  

Any idea how to troubleshoot this>?

Edited February 5, 2020 by CaptainBeardsEyesBeard

[CaptainBeardsEyesBeard]

in fact I realised it's in my generic functions file which is here

 

and code for this function for checking a field in IE is here

expandcollapse popup

Func Check_A_Field_Contains_In_InternetExplorer($ObjID, $ObjExpected, $FieldBeingTested)
    ConsoleWrite(@CRLF & $ObjExpected &  "$ObjID equals the following: " & $ObjID)
   FileWrite($TestLog, @CRLF & $ObjExpected & "$ObjID equals the following: " & $ObjID)
if IsObj($ObjID) Then
   if @error Then
               Console(@CRLF & "Error on IsObj($ObjID)  function")
         Endif
   if StringInStr($ObjID.Value,$ObjExpected) then
      if @error Then
               Console(@CRLF & "Error on stringinstring function")
         Endif
      MsgBox($MB_SYSTEMMODAL, "Test Result for field    " & $FieldBeingTested, "Test Passed:" & $ObjExpected & " " & $FieldBeingTested & "  matches the following value received "& $ObjID.value, 4)
         ConsoleWrite(@CRLF & @CRLF & "Test" & $TestCount & " Test Passed: " & $ObjExpected & " " &  $FieldBeingTested & "   matches the value expected " & $ObjID.value)

      FileWrite($TestLog, @CRLF & "Test" & $TestCount & " Test Passed: " & $ObjExpected & " " &  $FieldBeingTested & "   matches the value expected " & $ObjID.value)
      FileWrite($TestResults, @CRLF & "Test" & $TestCount & " Test Passed: " & $ObjExpected & " " &  $FieldBeingTested & "   matches the value expected ")

   Else
      MsgBox($MB_SYSTEMMODAL, "Test Result  ", "Test Failed:" & $ObjExpected & " " &  $FieldBeingTested & " doesn't match following value received "& $ObjID.value & "", 4)
      ConsoleWrite(@CRLF & "Test " & $TestCount & " Test Failed:"& $ObjExpected & " " & $FieldBeingTested & "    doesn't match the following value retrieved " & $ObjID.value)
      FileWrite($TestLog, @CRLF & "Test " & $TestCount & " Test Failed:"& $ObjExpected & " " & $FieldBeingTested & "     doesn't match the following value retrieved " & $ObjID.value)
      FileWrite($TestResults, @CRLF & "Test " & $TestCount & " Test Failed:"& $ObjExpected & " " & $FieldBeingTested & "     doesn't match the following value retrieved ")

       Sleep(4000)
    EndIf

 Else
    If @error Then
         ConsoleWrite(@CRLF & "Error on Check_A_Field_Contains_In_InternetExplorer function on ObjID")

       EndIf
  ConsoleWrite(@CRLF & $ObjID & $ObjID.Value &"Isn't an object")
  FileWrite($TestLog,@CRLF & $ObjID & $ObjID.Value &"Isn't an object" )
  FileWrite($TestLog, @CRLF & $ObjID & $ObjID.Value &"Test " & $TestCount & " Test Failed:"& $ObjExpected & " " & $FieldBeingTested & "      doesn't match the following value retrieved " & $ObjID.value)
  FileWrite($TestResults, @CRLF & $ObjID & $ObjID.Value & "Test failed: Not an object  ")

   EndIf
   $TestCount + 1

    EndFunc

 

[CaptainBeardsEyesBeard]

So after doing a bit of googling I came across this code to intercept Comm errors

$oMyError = ObjEvent("AutoIt.Error","MyErrFunc")    ; Initialize a COM error handler
; This is my custom defined error handler
Func MyErrFunc()
  Msgbox(0,"AutoItCOM Test","We intercepted a COM Error !"    & @CRLF  & @CRLF & _
             "err.description is: " & @TAB & $oMyError.description  & @CRLF & _
             "err.windescription:"   & @TAB & $oMyError.windescription & @CRLF & _
             "err.number is: "       & @TAB & hex($oMyError.number,8)  & @CRLF & _
             "err.lastdllerror is: "   & @TAB & $oMyError.lastdllerror   & @CRLF & _
             "err.scriptline is: "   & @TAB & $oMyError.scriptline   & @CRLF & _
             "err.source is: "       & @TAB & $oMyError.source       & @CRLF & _
             "err.helpfile is: "       & @TAB & $oMyError.helpfile     & @CRLF & _
             "err.helpcontext is: " & @TAB & $oMyError.helpcontext _
            )
Endfunc

After then running my scripts I get this 



Any idea?

 

Edited February 5, 2020 by CaptainBeardsEyesBeard

[mLipok]

The document is in frame ?

Is this frame on different server than the main frame/document ?