IE Automation - Exception from HRESULT: 0x800A01B6 - mshtml Reference

[tycox94]

Hey there,

Needing a little help. I'm trying to write an application to perform IE automation for a website. Here is the code:

            ' For each check rate
            For intTime = 1 To intCheckRate
                ' Try
                Try
                    ' Set value
                    Dim objDoc As mshtml.IHTMLDocument = MainForm.objIE.Document
                    Dim objAnchorToClickOn As mshtml.IHTMLAnchorElement = MainForm.objIE.Document.getElementById("ctl01_AddRowtoExceptionArray_AddRowtoExceptionArray_AddRowtoExceptionArray")
                    'ctl01_AddRowtoExceptionArray_AddRowtoExceptionArray_AddRowtoExceptionArray
                    ' Exit loop
                    intTime = intCheckRate + 1
                Catch ex As Exception
                    ' Do Nothing
                    Console.WriteLine(ex.ToString())
                    If (bolDebugger) Then MsgBox("Unable to find Add exception button")
                End Try
                ' Delay for wait refresh
                Threading.Thread.Sleep(1500)
            Next intTime

This error is occurring when I try assigning

mshtml.IHTMLAnchorElement = MainForm.objIE.Document.getElementById("ctl01_AddRowtoExceptionArray_AddRowtoExceptionArray_AddRowtoExceptionArray")

as

objAnchorToClickOn IHTMLAnchorElement

The element the script is grabbing is an anchor tag (<a></a>).

Error:

{"Exception from HRESULT: 0x800A01B6"}

Any ideas?

[ident]

Threading.Thread.Sleep(1500) and why?


can you please provide the website