code for a commond button

please help for a code to get URL (website) through commond button

Hey janu,

Not a clear question :confused:

when a command button is pressed, then what you wan to do really?

What do you mean by "get URL"? Are you asking how to display a web page from a VB6 application using a command button?

Quote:

---

Originally Posted by Hack

What do you mean by "get URL"? Are you asking how to display a web page from a VB6 application using a command button?

---

yes sir, you got my qurstion

yes janu,
check this thread
http://www.vbforums.com/showthread.php?t=384076

Try this

Code:

---

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 Command1_Click()
  Dim lngOpenPage As Long
    lngOpenPage = ShellExecute(Form1.hwnd, "Open", "http://www.vbforums.com",  0&, 0&, 0&)
End Sub

---