[收藏]通过写入注册表添加ODBC数据源

天云上人

  主要代码如下：

9 a( S' \0 {" Y  p" }void RegisterDBSource(CString strDSName, CString strDBPath)
{
& x& o) g' c3 u9 B9 B; W# p HKEY hKey;
   DWORD nLabel;
! \4 e0 g% l! M
CString strBaseKey = _T("SOFTWARE\\ODBC\\ODBC.INI");
CString strMid = strBaseKey + _T("\\ODBC Data Sources") ;

7 ?) `! F- L8 C8 o) s if(strDSName.IsEmpty()) return;
if(strDBPath.IsEmpty()) return;

- z4 {! b7 R2 Y, }$ L! j- H3 ` CString strDataSource = strBaseKey + _T("\\") + strDSName;

8 x, f: d5 \" g  W( s CString strMdb = _T("Microsoft Access Driver (*.mdb)");
CString strDBDriver = _T("C:\\WINNT\\System32\\odbcjt32.dll");
CString strFIL = _T("Ms Access;");
! s% t- Q5 t3 X! |( V  ]8 }2 y' B CString strUID = _T("");
6 U; E! `1 m: x- ?4 z- {: l
9 q+ w7 c- Z3 y6 @- C# x

RegCreateKeyEx(HKEY_CURRENT_USER,
: F% z4 S8 v3 _              strMid,
       0,
# p0 s& }  ?5 w  c( A) \     NULL,
+ B" r/ Z! ~: L3 ]: I0 @; o/ ?) Z     REG_OPTION_NON_VOLATILE,
    KEY_ALL_ACCESS,
    NULL,
& G/ E& Y; [# V5 f" J# U* U+ V( q* D     &hKey,
    &nLabel );//获取数据源键值句柄

RegSetValueEx(hKey,
     strDSName,
8 z/ b' G' v8 S9 u1 h4 o4 O9 L/ S/ n( y      0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strMdb),
9 J% y. k( J1 _      strlen((LPCTSTR)strMdb)+1);///设置数据源类型

; l/ Q  I$ }5 Q8 r RegCreateKeyEx(HKEY_CURRENT_USER,
         strDataSource,
   0,
1 o+ O  i/ c8 o; A5 s    NULL,
# U6 j" k8 W* `    REG_OPTION_NON_VOLATILE,
5 A6 R: |% h$ U; t% L) v8 g# A5 w    KEY_ALL_ACCESS,
   NULL,
! r( n5 ]: U% d/ k" S* q) w    &hKey,
   &nLabel );//创建数据源子键
+ I( d8 x6 l% ~% f) A! k! L  G
RegSetValueEx(hKey,
     _T("DBQ"),
% X5 ]) W2 Z8 t5 j; ~# J      0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strDBPath),
1 G3 V) q; j& i; P+ U" h# ?7 A      strlen((LPCTSTR)strDBPath)+1);//数据库表的全路径

  RegSetValueEx(hKey,
           _T("Driver"),
     0,
! t* @9 P- y! Q0 v+ ~9 X      REG_SZ,
     (const unsigned char *)((LPCTSTR)strDBDriver),
     strlen((LPCTSTR)strDBDriver)+1);//ODBC驱动的全路径

RegSetValueEx(hKey,
     _T("FIL"),
, F! R+ M5 _* C) {      0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strFIL),
     strlen((LPCTSTR)strFIL)+1);//表的类型

# ]3 r5 B5 k  z! k/ e- @& o5 L RegSetValueEx(hKey,
* x) \8 t# [3 c. `' h; e& l/ ]      _T("UID"),
     0,
6 z" F8 R* F' s0 W1 M  H" G      REG_SZ,
     (const unsigned char *)((LPCTSTR)strUID),
     strlen((LPCTSTR)strUID)+1);//必须项
1 `% Y/ Q" }- q
& P6 z6 [' ^! Z3 U1 f' }
3 g4 c9 m0 r( Q DWORD DriverId = (DWORD)25;
1 U& `" f- \7 T* R1 y RegSetValueEx(hKey,
    _T("DriverId"),
) U( s0 T( n7 f% h/ k  g' G     0,
. r4 ^$ \5 x/ o" E, n     REG_DWORD,
    (const BYTE *)(&DriverId),
% a6 `  ?- b0 K+ j) O- K     sizeof(DWORD));//必须项


/ ?3 Y% D# J; D. U( Q1 x8 ^* ? DWORD SafeTrans = (DWORD)0;
( ^  g: N; k7 k# S0 t9 } RegSetValueEx(hKey,
: y/ k0 j. y% n1 n- x  g4 c      _T("SafeTransactions"),
) k  Z3 U2 L" l3 n; R      0,
     REG_DWORD,
+ D& D1 X. l0 ^6 r/ ]2 X4 U* {      (const BYTE *)(&SafeTrans),
% Z; M9 n/ o- C. A9 G' W      sizeof(DWORD));//可选项
}


/ L  j: n# s7 I9 M( n
( c& o* Z" }& f, D; n- e调试环境：WINDOWS2000 + VC6.0 + VSP5.0