Getting default web browser

Does anyone know how I can determine the default web browser using VB.

Jim Hewitt
Software Developer
Liberty Tax Service
www.LibertyTax.com

Here's how you run the default web browser


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 Const SW_SHOW = 5

private Sub Command1_Click()
ShellExecute me.hwnd, "open", "about:blank", vbNullString, vbNullString, SW_SHOW
End Sub





Just querying the default browser, I don't know how to do it.