VB.net InternetExplorer HtmlDocument

Question

Может кто-нибудь мне помочь? Я новичок в VB.net и стараюсь писать очень простой код для управления сайтом. Тем не менее, я продолжаю получать

«Необработанное исключение типа„System.InvalidCastException“произошло в Defer All.exe .... Не удается привести COM-объект типа „System .__ ComObject“для взаимодействия типа" mshtml.HTMLDocument '. Эта операция завершилась неудачно, потому что вызов QueryInterface для COM-компонента для интерфейса с IID' ....). "

 Dim IE As InternetExplorer 
     Dim HTMLDoc As HtmlDocument 
     Dim oHTML_Element As mshtml.IHTMLElement 
     IE = new InternetExplorer 
     IE.Navigate("http://www.mediafire.com/") 
     Do Until IE.ReadyState = 4 
     Loop 
     Loop Until Not IE.Busy 
     ' ERROR on the following line 
     HTMLDoc = IE.Document 
     ' I tried making HTMLDoc as object. It passed the above line, but failed the next line due to no GetElementsByTagName method 
     For Each oHTML_Element In HTMLDoc.GetElementsByTagName("input") 
      '.................... 
     Next 

Answer 1

изменение ...

Dim IE As InternetExplorer 
Dim HTMLDoc As HtmlDocument 
'     ^---------------------------this thing to, 
               mshtml.IHTMLDocument 
Dim oHTML_Element As mshtml.IHTMLElement