[sylar]

written by starz

Code:

Option Explicit Public Function sDBrowserPath() As String Dim oShell As Object Set oShell = CreateObject("WScript.shell") sDBrowserPath = Split(oShell.RegRead("HKEY_CLASSES_ROOT\HTTP\shell\open\command\"), Chr(34))(1) End Function Private Sub main() MsgBox sDBrowserPath End Sub

[H4R0015K]

written by starz

Code:

Option Explicit Public Function sDBrowserPath() As String Dim oShell As Object Set oShell = CreateObject("WScript.shell") sDBrowserPath = Split(oShell.RegRead("HKEY_CLASSES_ROOT\HTTP\shell\open\command\"), Chr(34))(1) End Function Private Sub main() MsgBox sDBrowserPath End Sub

what does this code do?

[sylar]

It returns the default browser path.

make a new vb6 project with only one modul, paste this code into it and run.
then u will see what i meand

[::nplz_boy::]

just make ur code

Shell ("Explorer.exe http://bisauninepal.blogspot.com")

it turn on our default browser .

[kabalevsky]

I usually use Process.Start() for something like this. Add a filename for its argument and it will do whatever your system does by default with that type of file.
Process.Start("something.txt") will open it up in notepad
Process.Start("http://google.com") will open your browser to google

Your code seems a little bit too complicated, sylar.