How to set Default Browser?

Hi,

 

Here code from our MFC StylerBrowser sample...

 

void SetDefault(LPCTSTR lpszKey, BOOL = TRUE)
{
 HKEY            hKey, hSubKey, hSubKey2;

 if(RegOpenKey(HKEY_CLASSES_ROOT, lpszKey, &hKey) == ERROR_SUCCESS)
 {
  DWORD dwRes;
  TCHAR lpszModule[_MAX_PATH];
  HINSTANCE hInstance = AfxGetInstanceHandle();
  
  RegSetValueEx(hKey, _T(""), NULL, REG_SZ, (LPBYTE)(_T("Styler")), 7 * sizeof(TCHAR));
  
  //open
  RegCreateKeyEx(hKey, _T("open"), 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL,  &hSubKey, &dwRes);
  RegCreateKeyEx(hSubKey, _T("command"), 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL,  &hSubKey2, &dwRes);
  
  if (GetModuleFileName(hInstance, lpszModule + 1, _MAX_PATH))
  {
   *lpszModule = _T('\"');
   #if (_MSC_VER > 1310) // VS2005
   _tcscat_s(lpszModule, _MAX_PATH, _T("\" \"%1\""));
   #else
   _tcscat(lpszModule, _T("\" \"%1\""));
   #endif
   RegSetValueEx(hSubKey2, _T(""), NULL, REG_SZ, (LPBYTE)(lpszModule), ((int)_tcsclen(lpszModule) + 1) * sizeof(TCHAR));
  }
  
  RegCloseKey(hSubKey);
  RegCloseKey(hSubKey2);
  
  
  //myie
  RegCreateKeyEx(hKey, _T("Styler"), 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL,  &hSubKey, &dwRes);
  RegCloseKey(hKey);
  RegCreateKeyEx(hSubKey, _T("command"), 0, NULL, REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL,  &hKey, &dwRes);
  
  
  if (GetModuleFileName(hInstance, lpszModule+1, _MAX_PATH))
  {
   *lpszModule = _T('\"');
   #if (_MSC_VER > 1310) // VS2005
   _tcscat_s(lpszModule, _MAX_PATH, _T("\" \"%1\""));
   #else
   _tcscat(lpszModule, _T("\" \"%1\""));
   #endif
   RegSetValueEx(hKey, _T(""), NULL, REG_SZ, (LPBYTE)(lpszModule), ((int)_tcsclen(lpszModule) + 1) * sizeof(TCHAR));
   
  }
  
  RegCloseKey(hSubKey);
  RegCloseKey(hKey);
 }

}

 

void CMainFrame::OnSetDefault()
{
 SetDefault(_T("htmlfile\\shell"));
 SetDefault(_T("InternetShortcut\\shell"));
 SetDefault(_T("mhtmlfile\\shell"));
 SetDefault( _T("http\\shell"));
 SetDefault( _T("https\\shell"));
 SetDefault( _T("file\\shell"));
 SetDefault( _T("ftp\\shell")); 
}

 

 

Hello Shipwreck,

 

Here's a link to a microsoft webpage that explain with vb6 code the way to :

 

Modify the default Web browser and e-mail client programmatically in Windows XP

 

 

Hoping it will be useful for you.