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

天云上人

  主要代码如下：

void RegisterDBSource(CString strDSName, CString strDBPath)
{
7 m- l: C! ?! Y( A/ F% L1 V  }, i HKEY hKey;
( x3 b1 a" m/ Z/ D' F6 g2 |$ R: l    DWORD nLabel;
2 G% O7 N+ c5 J1 b6 Q8 J1 J5 W
0 p, n7 b$ `5 ~1 A2 r& j CString strBaseKey = _T("SOFTWARE\\ODBC\\ODBC.INI");
/ c6 b! c1 U5 E+ k; w! M9 } CString strMid = strBaseKey + _T("\\ODBC Data Sources") ;

if(strDSName.IsEmpty()) return;
% K9 Z: k, g( \# I  f7 R" z if(strDBPath.IsEmpty()) return;

* P7 z' a5 \: X/ `- ~% ~6 ^0 ^ CString strDataSource = strBaseKey + _T("\\") + strDSName;

# U; r) j3 F/ m$ U4 b CString strMdb = _T("Microsoft Access Driver (*.mdb)");
/ j  I" c8 m0 o/ S' I CString strDBDriver = _T("C:\\WINNT\\System32\\odbcjt32.dll");
CString strFIL = _T("Ms Access;");
0 _1 g3 ^. n2 i. j$ C CString strUID = _T("");

+ z# [/ q9 y( Y1 {/ E( }9 M0 `

RegCreateKeyEx(HKEY_CURRENT_USER,
+ |1 \6 z" M& E2 B; e6 x# @9 C              strMid,
       0,
    NULL,
' Y) W- r/ J& W: }     REG_OPTION_NON_VOLATILE,
: X5 b* m9 z* {1 z$ }) ?7 k9 {' j  Q     KEY_ALL_ACCESS,
# |/ z  i8 l. z& O' d% e     NULL,
    &hKey,
2 t7 d, j$ ]$ o     &nLabel );//获取数据源键值句柄

RegSetValueEx(hKey,
- s  e5 p8 c9 q4 d$ [7 X! v* g      strDSName,
     0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strMdb),
) n4 p4 E' g* |+ t+ H  Q      strlen((LPCTSTR)strMdb)+1);///设置数据源类型

5 |+ t# e1 p$ |. c RegCreateKeyEx(HKEY_CURRENT_USER,
         strDataSource,
   0,
6 G+ ~3 N( {: v* a& N: K    NULL,
9 ?9 U* V2 c# c; L    REG_OPTION_NON_VOLATILE,
   KEY_ALL_ACCESS,
   NULL,
   &hKey,
   &nLabel );//创建数据源子键

+ Q4 ]; {8 A3 R# d0 ^$ H4 a4 ~& c! v RegSetValueEx(hKey,
8 j/ ^. T, p4 `1 x1 R+ y$ v7 M      _T("DBQ"),
     0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strDBPath),
. {7 A+ {& V' p5 c1 D3 \  @# n      strlen((LPCTSTR)strDBPath)+1);//数据库表的全路径
, x: G% k, \& f5 T' i, {- q7 ~
  RegSetValueEx(hKey,
           _T("Driver"),
0 H) E$ I1 h3 ^  d; s% b: q      0,
     REG_SZ,
, z/ }: x8 A) A4 p0 n      (const unsigned char *)((LPCTSTR)strDBDriver),
. l  W" ^0 c# t7 h, Z      strlen((LPCTSTR)strDBDriver)+1);//ODBC驱动的全路径
3 d1 x! _$ y6 S: e3 D. m
RegSetValueEx(hKey,
     _T("FIL"),
     0,
4 O9 o, O  [3 f8 R& G/ y7 p      REG_SZ,
     (const unsigned char *)((LPCTSTR)strFIL),
     strlen((LPCTSTR)strFIL)+1);//表的类型

RegSetValueEx(hKey,
     _T("UID"),
     0,
     REG_SZ,
     (const unsigned char *)((LPCTSTR)strUID),
( D4 W* T* f* C; }, y! q6 l! h% M      strlen((LPCTSTR)strUID)+1);//必须项


DWORD DriverId = (DWORD)25;
7 b9 j; H0 x& n. T) T RegSetValueEx(hKey,
9 ^' `0 R4 M: M/ g6 [, r( U5 _! n     _T("DriverId"),
% ^& J& b' D- v2 [! Q" G     0,
    REG_DWORD,
3 I+ L! d4 N/ {9 B; ~' ^     (const BYTE *)(&DriverId),
    sizeof(DWORD));//必须项

& n. d/ }) I: c9 h+ K! f3 }
% y" _0 d& n7 [. Z DWORD SafeTrans = (DWORD)0;
RegSetValueEx(hKey,
     _T("SafeTransactions"),
1 l7 r3 Q7 |; V* ~" O; [' P8 m( u      0,
     REG_DWORD,
) W/ \' V9 ^/ l+ ?      (const BYTE *)(&SafeTrans),
     sizeof(DWORD));//可选项
}


% }. l$ l0 L) e* T% S8 q
调试环境：WINDOWS2000 + VC6.0 + VSP5.0