Thank you always for giving quick reply .I have placed below code for your satisfaction because i told many times that same script working fine in other workstation which have old windows 10 version and updated test complete 14 version. I just placed small code but i am getting same error in many scripting area where it worked well before windows update .it is not supporting Exists and Set object property when ever I use .
Could you please help me for resolving this issue with latest windows update version.
Sub Main_Testing
' Err.Clear
' On Error Resume Next
' To click main menu item
ClickDispTable_MenuItem("Main Menu")
End Sub
Function ClickDispTable_MenuItem(linkText)
Dim table,propArray, valArray,link
Call SelectSystem
Set table = Sys.Process("A").WinFormsObject("AMain").WinFormsObject("_WebBrowserHost").WinFormsObject("WebBrowser", "").WinFormsObject("Shell Embedding", "").Window("Shell DocObject View", "", 1).Window("Internet Explorer_Server", "", 1)_
.Page(ServerURLname).Frame("FrameMain1").Form("MainMenu")
propArray = Array("innerText","ObjectType")
valArray = Array(linkText,"Cell")
Set link = table.FindChild(propArray,valArray,50)
If (link.Exists) Then :- causing error when i use local and test complete script function
Call link.Click
End If
End Function