'Put this In the Declare section of the project
Public Declare Function ShellExecute Lib "SHELL32.DLL" Alias "ShellExecuteA"
( ByVal hwnd As Long , ByVal lpOperation As String , ByVal lpFile As String ,
ByVal lpParameters As String , ByVal lpDirectory As String , ByVal nShowCmd As Long ) As Long
Public Const SW_ShowNormal = 1
'put this where you can execute it, such as in a button click event
Dim iReturn As Long
iReturn = ShellExecute(frmMain.hwnd, "Open" , " http://www.garybeene.com " ,
vbNullString, vbNullString, SW_ShowNormal)
