<b>在VC中动态加载 ODBC的方法</b>

(CONST BYTE＊ )((LPCTSTR) strFil),strFil .GetLength ())；

::RegSetValueEx (hKey," PWD" ,0L,REG_SZ,

(CONST BYTE＊ )((LPCTSTR)strPwd),strPwd.GetLength ()) ; ::RegSetValueEx (hKey," SafeTransactions" ,0L,

REG_DWORD,(CONST BYTE＊ )(＆ dwSafeTransactions),sizeof(dw));

::RegSetValueEx (hKey," UID" ,0L,REG_SZ,

(CONST BYTE＊ )((LPCTSTR)strUid),strUid .GetLength ()); ::RegCloseKey(hKey);

//创建 ODBC数据源的 Jet子键

strSubKey＋ =" \\Engines\\Jet" ;

lReturn=::RegCreateKeyEx (HKEY_LOCAL_MACHINE ,(LPCTSTR)strSubKey,0,NULL,REG_OPTION_NON_

VOLATILE,KEY_WRITE,NULL,＆ hKey,＆ dw);

if(lReturn != ERROR_SUCCESS)

return false;

//设置该子键下的各项参数

CString strImplict=" " ;

CString strUserCommit=" Yes" ;

DWORD dwPageTimeout=5;

DWORD dwThreads=3;