Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
How do I open IE from a VB app?
- Thread starter Lothster
- Start date
JohnYingling
Programmer
I use this. You can put it into a class if you want multiple IEs active. If used in a module it will re-use the IE if it has one.
Private f_objIE As Object
.......
Public Sub IExplore(strURL As String)
Dim strResponse As String
If Not f_objIE Is Nothing Then
On Error Resume Next
f_objIE.Visible = True
strResponse = Err.Description
If Len(strResponse) > 0 Then
Set f_objIE = Nothing
End If
On Error GoTo 0
End If
If f_objIE Is Nothing Then
On Error Resume Next
Set f_objIE = CreateObject("InternetExplorer.Application"
On Error GoTo 0
End If
On Error Resume Next
f_objIE.Visible = True
f_objIE.Navigate strURL
On Error GoTo 0
End Sub Forms/Controls Resizing/Tabbing Control
Compare Code (Text)
Generate Sort Class in VB or VBScript
Private f_objIE As Object
.......
Public Sub IExplore(strURL As String)
Dim strResponse As String
If Not f_objIE Is Nothing Then
On Error Resume Next
f_objIE.Visible = True
strResponse = Err.Description
If Len(strResponse) > 0 Then
Set f_objIE = Nothing
End If
On Error GoTo 0
End If
If f_objIE Is Nothing Then
On Error Resume Next
Set f_objIE = CreateObject("InternetExplorer.Application"
On Error GoTo 0
End If
On Error Resume Next
f_objIE.Visible = True
f_objIE.Navigate strURL
On Error GoTo 0
End Sub Forms/Controls Resizing/Tabbing Control
Compare Code (Text)
Generate Sort Class in VB or VBScript
- Thread starter
- #4
- Status
