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

天云上人

  主要代码如下：

$ B: p' k0 W) m5 B; ?void RegisterDBSource(CString strDSName, CString strDBPath)
; `% h# X6 ^! `+ {9 Q{
- R; K$ b8 K$ n% ^; q  u HKEY hKey;
/ H7 H, U, p1 N    DWORD nLabel;
: y2 H( F+ p+ L6 |! O
CString strBaseKey = _T("SOFTWARE\\ODBC\\ODBC.INI");
CString strMid = strBaseKey + _T("\\ODBC Data Sources") ;
1 J. `. F0 f5 P
if(strDSName.IsEmpty()) return;
if(strDBPath.IsEmpty()) return;

' Y2 y4 p! \, D& {; s CString strDataSource = strBaseKey + _T("\\") + strDSName;

1 K: Z6 V& \' p$ J2 d, l2 H! i CString strMdb = _T("Microsoft Access Driver (*.mdb)");
CString strDBDriver = _T("C:\\WINNT\\System32\\odbcjt32.dll");
CString strFIL = _T("Ms Access;");
CString strUID = _T("");
/ L0 ~2 z" f1 P

; w4 V3 G# ^: g( o
  N) M" o& ?$ g; s0 E0 L RegCreateKeyEx(HKEY_CURRENT_USER,
             strMid,
       0,
    NULL,
) I3 v6 e: p# J* U6 ^     REG_OPTION_NON_VOLATILE,
# Z+ `0 O! p+ ~4 Z0 z" k9 D0 S2 k6 o     KEY_ALL_ACCESS,
    NULL,
    &hKey,
% t' e3 D' g8 A0 m% L) M" q- f5 t1 W) B     &nLabel );//获取数据源键值句柄

RegSetValueEx(hKey,
     strDSName,
     0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strMdb),
4 i; e; o; P  g7 g      strlen((LPCTSTR)strMdb)+1);///设置数据源类型
( p* A! F: j+ L
RegCreateKeyEx(HKEY_CURRENT_USER,
+ W7 ^5 ?& S1 R, x* w6 l9 E$ u          strDataSource,
   0,
( j+ o& s7 Y) [" _, X    NULL,
# |3 T0 K) o/ C# j    REG_OPTION_NON_VOLATILE,
   KEY_ALL_ACCESS,
! M! e& m9 z7 q, S    NULL,
   &hKey,
   &nLabel );//创建数据源子键
$ i- ?1 m% c  v9 _; w1 Z# @  Z
RegSetValueEx(hKey,
     _T("DBQ"),
: U( R) d8 ^* ~. t! M* `      0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strDBPath),
     strlen((LPCTSTR)strDBPath)+1);//数据库表的全路径

" n, L8 \) G. T  _4 Z7 ?/ d  RegSetValueEx(hKey,
& d3 p6 x& D0 S8 J  ]2 v            _T("Driver"),
     0,
     REG_SZ,
9 V) y: p' g% \, V      (const unsigned char *)((LPCTSTR)strDBDriver),
     strlen((LPCTSTR)strDBDriver)+1);//ODBC驱动的全路径
! c6 _' s7 H- H& w+ {8 f
% Z( q4 b2 ^( g. }+ g0 d9 C- F RegSetValueEx(hKey,
4 z; f. o$ E: T* b+ I# n5 x      _T("FIL"),
     0,
     REG_SZ,
# M/ M3 t/ c& h      (const unsigned char *)((LPCTSTR)strFIL),
     strlen((LPCTSTR)strFIL)+1);//表的类型

RegSetValueEx(hKey,
     _T("UID"),
( H/ }$ l/ V: `9 a2 n0 \      0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strUID),
     strlen((LPCTSTR)strUID)+1);//必须项

+ y# X4 G8 O7 F; j. G. l
( z2 z1 Q! N. B* p DWORD DriverId = (DWORD)25;
RegSetValueEx(hKey,
" }. V+ Q6 |5 Y# f9 R     _T("DriverId"),
4 U7 m' h8 n0 {7 ~" D     0,
    REG_DWORD,
    (const BYTE *)(&DriverId),
    sizeof(DWORD));//必须项

7 T: t2 K/ g( i! h/ T! M
DWORD SafeTrans = (DWORD)0;
RegSetValueEx(hKey,
     _T("SafeTransactions"),
     0,
! e% I# L5 y3 G. M) d: H      REG_DWORD,
; K' P* ]* Z( W8 L' X, w      (const BYTE *)(&SafeTrans),
# q/ s- d$ v- f$ F  {& t      sizeof(DWORD));//可选项
# k6 t: h: e  r0 a}



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