Main Web Browser Help!

I am making a web browser that is almost done. I need code so that the browser becomes the main browser for windows. If someone could post me the code I would greatly appreciate it.

Daniel

This Sub should help you to associate your Programm with Webdocuments.

Public Sub CreateAssociation(PROG As String, AppPath As String, appExename As String, EXT As String, BESKRIV As String, IconLib As String)
Dim sPath As String
sPath = AppPath & "\" & appExename & " %1"

CreateNewKey "." & EXT, HKEY_CLASSES_ROOT
SetKeyValue "." & EXT, "", PROG, REG_SZ

CreateNewKey PROG & "\shell\open\command", HKEY_CLASSES_ROOT
CreateNewKey PROG & "\DefaultIcon", HKEY_CLASSES_ROOT

SetKeyValue PROG, "", BESKRIV, REG_SZ
SetKeyValue PROG & "\shell\open\command", "", sPath, REG_SZ
SetKeyValue PROG & "\DefaultIcon", "", IconLib, REG_SZ
End Sub
'ie your browser is called easyweb.
private sub Form_Load()
call CreateAssociation("easyweb",App.Path,App.EXEName, "html", "EasyWeb HTML document", App.Path & "\EasyWebHTML.ico")
'That will associate your Prog with the HTML documents do this for all other types you want also your Programm is the standard