寫註冊表動態建立SQL Server ODBC資料來源

寫註冊表動態建立SQL Server ODBC資料來源
 
各個參數的意義：
DBServer: 資料庫所在主機
DBName:  資料庫名稱
DSN:   資料來源名稱
UID:   登陸使用者
傳回值：
-1: 沒有安裝SQL Server驅動程式
-2: 其他錯誤
0: 成功

實現函數：
int MakeSQLServerODBCDSN(LPCTSTR DBServer,LPCTSTR DBName,LPCTSTR DSN,LPCTSTR UID)
{
BOOL  bInstallDriver=TRUE;
CRegKey  regKey;

LONG lRet=regKey.Open(HKEY_LOCAL_MACHINE,"Software//ODBC//ODBCINST.INI//SQL Server");
if(lRet!=ERROR_SUCCESS)
{
  bInstallDriver=FALSE;
}
else
{
  char  szDirverPath[MAX_PATH]="";
  DWORD  dwCount=100;
  lRet=regKey.QueryValue(szDirverPath,"Driver",&dwCount);
  if((lRet!=ERROR_SUCCESS)||(dwCount<1))
  {
   DWORD dwErr=GetLastError();
   bInstallDriver=FALSE;
  }
  regKey.Close();
}
if(!bInstallDriver)
{
  return -1;
}
CString  strKeyValueName="Software//ODBC//ODBC.INI//";
strKeyValueName+=DSN;
lRet=regKey.Create(HKEY_LOCAL_MACHINE,strKeyValueName);
if(lRet!=ERROR_SUCCESS)
{
  return -2;
}
regKey.SetValue(DBName,"Database");
regKey.SetValue("SQLSrv32.dll","Driver");
regKey.SetValue(DBServer,"Server");
regKey.SetValue(UID,"LastUser");
regKey.m_hKey=HKEY_LOCAL_MACHINE;
regKey.SetKeyValue("Software//ODBC//ODBC.INI//ODBC Data Sources","SQL Server",DSN);
regKey.Close();
return 0;
}