一个创建数据源的方法

一个创建数据源的方法

1. /************************************************************************/
2. /* 
3.         功能  : 写注册表动态创建SQL Server ODBC数据源(系统DSN)
4.         参数  : 
5.             (in) DBServer           -- 数据库所在主机
6.             (in) DBName             -- 数据库名称
7.             (in) DSN                -- 数据源名称
8.             (in) UID                -- 登陆用户
9.         返回   : 
10.             没有安装SQL Server驱动程序   =   -1
11.             其他错误                     =   -2
12.             成功                       =    0 
13. */
14. /************************************************************************/
15. int WINAPI MakeSQLServerODBCDSN(LPCTSTR DBServer,LPCTSTR DBName,LPCTSTR DSN,LPCTSTR UID)
16. {
17.     BOOL  bInstallDriver=TRUE;
18.     CRegKey  regKey;
20.     LONG lRet=regKey.Open(HKEY_LOCAL_MACHINE,"Software//ODBC//ODBCINST.INI//SQL Server");
21.     if(lRet!=ERROR_SUCCESS)
22.     {
23.         bInstallDriver=FALSE;
24.     }
25.     else
26.     {
27.         char  szDirverPath[MAX_PATH]="";
28.         DWORD  dwCount=100;
29.         lRet=regKey.QueryValue(szDirverPath,"Driver",&dwCount);
30.         if((lRet!=ERROR_SUCCESS)||(dwCount<1))
31.         {
32.             DWORD dwErr=GetLastError();
33.             bInstallDriver=FALSE;
34.         }
35.          regKey.Close();
36.     }
37.     if(!bInstallDriver)
38.     {
39.          return -1;
40.     }
41.     char NameC[100] = "" ;
42.     char DSNC[100] = "" ;
43.     strcpy(NameC,"Software//ODBC//ODBC.INI//") ;
44.     strcpy(DSNC,DSN) ;
45.     strcat(NameC,DSNC) ;
46.     LPCTSTR  strKeyValueName = NameC ;
47.     lRet=regKey.Create(HKEY_LOCAL_MACHINE,strKeyValueName);
48.     if(lRet!=ERROR_SUCCESS)
49.     {
50.          return -2;
51.     }
52.     regKey.SetValue(DBName,"Database");
53.     regKey.SetValue("SQLSrv32.dll","Driver");
54.     regKey.SetValue(DBServer,"Server");
55.     regKey.SetValue(UID,"LastUser");
56.     regKey.m_hKey=HKEY_LOCAL_MACHINE;
57.     regKey.SetKeyValue("Software//ODBC//ODBC.INI//ODBC Data Sources","SQL Server",DSN);
58.     regKey.Close();
59.     return 0;
60. }