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

天云上人

  主要代码如下：
9 a6 `0 f" L0 U( n
void RegisterDBSource(CString strDSName, CString strDBPath)
# [8 y$ k4 ]% J0 R- c& Q{
HKEY hKey;
   DWORD nLabel;
: H; W: {+ m0 E5 M6 Z
CString strBaseKey = _T("SOFTWARE\\ODBC\\ODBC.INI");
2 e* d. _9 C% h; p CString strMid = strBaseKey + _T("\\ODBC Data Sources") ;
. V% {; n' i8 T  F- H, X" V" q4 c# w
# N8 b/ ]) F3 `, w if(strDSName.IsEmpty()) return;
7 e3 F8 B7 q; n8 e/ w' w% H if(strDBPath.IsEmpty()) return;
/ V: h' q% M) L" B2 C3 u: c
CString strDataSource = strBaseKey + _T("\\") + strDSName;

! Q% N, e- A/ _' j% C2 _2 _" g' w CString strMdb = _T("Microsoft Access Driver (*.mdb)");
% u+ u  v/ F, R" `2 _ CString strDBDriver = _T("C:\\WINNT\\System32\\odbcjt32.dll");
CString strFIL = _T("Ms Access;");
CString strUID = _T("");
5 H* c: ~) f$ N$ K# p
1 V  n; ^8 }% k% u, a

8 |8 f5 J7 l6 v RegCreateKeyEx(HKEY_CURRENT_USER,
             strMid,
3 R9 G7 a/ ~9 A% a! @! P  B1 v+ ^- M        0,
/ q5 L* _$ `% r: L/ _0 s& q0 E7 W     NULL,
! d. |8 C+ S; b# ]7 l# _0 @: ]     REG_OPTION_NON_VOLATILE,
( Q/ T' f+ Y& b# A* g4 S5 j     KEY_ALL_ACCESS,
    NULL,
7 x" r$ X$ @' |3 k) m# R     &hKey,
    &nLabel );//获取数据源键值句柄

RegSetValueEx(hKey,
' K1 H, ^' l: `# w! o9 d% m      strDSName,
0 L' a5 j# C' D  S* k      0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strMdb),
     strlen((LPCTSTR)strMdb)+1);///设置数据源类型

RegCreateKeyEx(HKEY_CURRENT_USER,
         strDataSource,
7 Z) v7 G# j4 c, ?6 n5 t; ^# d    0,
   NULL,
   REG_OPTION_NON_VOLATILE,
% T+ {; M( g8 Y2 ?! W    KEY_ALL_ACCESS,
   NULL,
   &hKey,
2 u2 _1 U" ^4 f$ }4 J) W) Q    &nLabel );//创建数据源子键
4 E7 B. J& H( X7 R. K- v7 o
, R, n9 ~% c8 Z1 V+ D RegSetValueEx(hKey,
     _T("DBQ"),
     0,
% p+ X% W: G% T; X; V* |      REG_SZ,
     (const unsigned char *)((LPCTSTR)strDBPath),
8 m3 a4 s6 e5 d% c: V      strlen((LPCTSTR)strDBPath)+1);//数据库表的全路径
. ~% m( x7 U6 {: T$ I8 b/ y
+ n# Z* o$ P6 [& C  RegSetValueEx(hKey,
           _T("Driver"),
% u$ ^( R4 e! U      0,
     REG_SZ,
* E! ?/ X8 I4 k  G* Q6 H; D      (const unsigned char *)((LPCTSTR)strDBDriver),
     strlen((LPCTSTR)strDBDriver)+1);//ODBC驱动的全路径
( o* M8 B/ q1 Q9 g* t* d( V" k. s
RegSetValueEx(hKey,
     _T("FIL"),
     0,
3 j+ [5 e' \+ z: N* x4 @2 f/ Z- `      REG_SZ,
     (const unsigned char *)((LPCTSTR)strFIL),
     strlen((LPCTSTR)strFIL)+1);//表的类型

1 W1 }, J& T! r' w/ v RegSetValueEx(hKey,
     _T("UID"),
     0,
. ]( J. E( a1 S" q1 S6 `6 K) Y      REG_SZ,
     (const unsigned char *)((LPCTSTR)strUID),
: a4 z( p1 T/ K! k* |1 V( h) ^      strlen((LPCTSTR)strUID)+1);//必须项
) H5 ~( k8 V+ p. ~9 D
6 N, Z, Y; M0 E" g! y5 B' G
, f: @: T+ r7 S# n. R1 j, k DWORD DriverId = (DWORD)25;
RegSetValueEx(hKey,
    _T("DriverId"),
    0,
% |. t0 Q5 f$ u0 D, X7 c) J     REG_DWORD,
    (const BYTE *)(&DriverId),
$ w4 m2 L2 ~  U+ a     sizeof(DWORD));//必须项
( {& y& g9 q9 y2 K$ R& ]

DWORD SafeTrans = (DWORD)0;
RegSetValueEx(hKey,
     _T("SafeTransactions"),
5 f4 a' ?) o, r  [' D      0,
& M$ ^8 G6 F4 i$ J6 k/ o9 B2 @. F      REG_DWORD,
/ j% h. X1 n' T+ Z3 n" W      (const BYTE *)(&SafeTrans),
: ]8 E6 L0 z  h6 b4 b+ P1 V      sizeof(DWORD));//可选项
( ?% {0 Y0 p: o# `. g9 B3 u4 F" P}
. P, F. Y; z. _7 k9 V; }$ \


调试环境：WINDOWS2000 + VC6.0 + VSP5.0