how do you make a command button into a hyperlink to a website?

[napjunk]

Ok, i know this is probably a very simple question, but, how do you make a command button into a hyperlink to a website?

like say the button says "Click here for support" and when you click it, it goes to

http://www.whatever.com/support

in your default internet browser...

 

[JohnYingling]

' Form Level Declarations
Private f_objIE as InternetExplorer.Application
'*******
Private command1_Click()
On Error Resume Next
Set f_objIE = CreateObject("InternetExplorer.Application&quot
if Err.Number <> 0 then
f_objIE.Navigate &quot;

http://www.microsoft.com&quot;

End if
On error goto 0
End Sub

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort in VB or VBScript

 

[napjunk]

Do i put the

Private f_objIE As InternetExplorer.Application

in Form_Load? or where? because i've tried form load and general declarations and it doesn't work

 

[JohnYingling]

Put it in the form General Declarations. What does not work? What is the error message? You should already have a reference to Microsoft Internet Controls or change
Private f_objIE as InternetExplorer.Application
to
Private f_objIE as Object
but you lose Intellisense.

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort in VB or VBScript

 

[napjunk]

it says:

compile error:

User-Defined Type Not defined.

and highlights

f_objIE As InternetExplorer.Application

in General Declarations.

 

[AdaHacker]

May I suggest another approach? Use the ShellExecute API. Here's an example:

Option Explicit
Private 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

Private Sub Form_Load()
Call ShellExecute(Me.hwnd, "open", "[URL unfurl="true"]http://www.yahoo.com",[/URL] vbNullString, vbNullString, 0)
Unload Me
End Sub

All this does is open yahoo.com in IE, which is my defualt web browser. The advantage of this is that it will use the default web browser as opposed to relying on IE. Of course, almost every Windows system these days has IE installed, so it's not a really big deal to use it, but it's still better not to assume too much about your users' machines.