Thomas Risi Softwareentwicklung
Addins - Datenbanklösungen - Komponenten - RTDServer - WebServices
BrowserCreateClose
Diese Funktion erstellt eine Instanz des InternetExplorers, und beendet diesen
bei nochmaligem Aufruf der Funktion.
Option Explicit
Dim ie As Object
Sub BrowserCreateClose()
If ie Is Nothing Then
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = True
Else
ie.Quit
Set ie = Nothing
End If
End Sub
© 2001 -
by Thomas Risi