Help

[codegreen]

how can i do this i get an error


Dim withevents IE As InternetExplorer
Private Sub Form_Load()
Set IE = CreateObject("InternetExplorer.application")
IE.Visible = True
End Sub

[Bloodeye]

Try this:

Dim Withevents IE As Object
or
Dim IE As Object

[jjortiz]

Okay you are probably getting a user defined error. The code looks fine to me so i am not going to test it. Here is what i think that the problem is. You need to refrence the Microsoft Internet controls from Projects the refrences.

[codegreen]

i did if i take out Dim withevents IE As InternetExplorer
and do this it works put i need the withevents
Private Sub Form_Load()
Set IE = CreateObject("InternetExplorer.application")
IE.Visible = True
End Sub

[Bloodeye]

It's like jjortiz said: You will need to make a reference to the "Microsoft Internet Controls". Click Project\References, and then find and put a checkmark next to "Microsoft Internet Controls". Everything should work then, even with the Declaration Dim withevents IE As InternetExplorer.

[jjortiz]

I just tested the code. I mean when i posted the first time the code looked fine and it is. It works find on my system as long as the refrences the MS internet controls.

[codegreen]

thanks i had the wrong thing reference

[jjortiz]

Hey hey no refrencing wrong things around here. People might get the wrong idea. Okay jjortiz stop with the dry humor and thanks. You are welcome.