VC下的通用数据库访问类

   VC下用ADO连接数据库通用类，来自网上，稍微整理了一下。用的时候直接添加进去并在项目里引用头文件就可以了。

AdoConn.h

1. //   AdoConn.h:   interface   for   the   AdoConn   class.   
2. //   
3. //   
5. //几点说明:   
6. //(1)   您的环境中msado15.dll不一定在这个目录下，请按实际情况修改   
7. //(2)   在编译的时候肯能会出现如下警告，对此微软在MSDN中作了说明，并建议我们不要理会这个警告。   
8. //msado15.tlh(405)   :   warning   C4146:   unary   minus   operator   applied   to   unsigned   type,   result   still   unsigned     
10.    
11. #import "c:/Program Files/Common Files/System/ado/msado15.dll" no_namespace rename("EOF","adoEOF") rename("BOF","adoBOF")   
13. #if !defined(AFX_AdoConn_H__AC448F02_AF26_45E4_9B2D_D7ECB8FFCFB9__INCLUDED_)   
14. #define AFX_AdoConn_H__AC448F02_AF26_45E4_9B2D_D7ECB8FFCFB9__INCLUDED_   
16. #if _MSC_VER >1000   
17. #pragma once   
18. #endif //_MSC_VER>1000   
20. class AdoConn       
21. {
22.     //定义变量   
23. public:   
24.     //添加一个指向Connection对象的指针:   
25.     _ConnectionPtr m_pConnection;   
26.     //添加一个指向Recordset对象的指针:   
27.     _RecordsetPtr m_pRecordset;   
28.     //定义方法   
29. public:   
30.     AdoConn();   
31.     virtual ~AdoConn();   
32.     //初始化—连接数据库   
33.     void OnInitAdoConn();   
34.     //连接数据库,供登录时测试用   
35.     void TestAdoConn(CString servername,CString username,CString password);   
36.     //执行查询   
37.     _RecordsetPtr& GetRecordSet(_bstr_t bstrSQL);   
38.     //执行SQL语句，Insert Update _variant_t   
39.     BOOL ExecuteSQL(_bstr_t bstrSQL);   
40.     void ExitConnect();   
41. };   
43.   #endif //!defined(AFX_AdoConn_H__AC448F02_AF26_45E4_9B2D_D7ECB8FFCFB9__INCLUDED_)

AdoConn.cpp

1. ///
2. //   AdoConn.cpp:   implementation   of   the   AdoConn   class.     //
3. ///
4. #include "stdafx.h"
5. #include "AdoConn.h"
6. #ifdef _DEBUG
7. #undef THIS_FILE
8. static char THIS_FILE[]=__FILE__;
9. #define new DEBUG_NEW
10. #endif
12. //   
13. //   Construction/Destruction   
14. //   
16. AdoConn::AdoConn()   
17. {
18.     
19. }
20. AdoConn::~AdoConn()   
21. {   
22.     
23. }   
25. //初始化—连接数据库   
26. void     AdoConn::OnInitAdoConn()   
27. {   
28.     //初始化OLE/COM库环境     
29.     ::CoInitialize(NULL);   
30.     try   
31.     {   
32.         //创建Connection对象   
33.         m_pConnection.CreateInstance("ADODB.Connection");   
34.         //设置连接字符串，必须是BSTR型或者_bstr_t类型
35.         char path[ MAX_PATH ] = { '/0' }; 
36.         CString DataSource="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=";
37.         GetCurrentDirectory( MAX_PATH, path ); 
38.         CString pathstr;
39.         pathstr.Format("%s",path);
40.         DataSource +=pathstr;
41.         DataSource += "//info.mdb"; 
42.         DataSource +=";Persist Security Info=False";
43.         _bstr_t   strConnect   =   (_bstr_t)DataSource;   
44.         m_pConnection->Open(strConnect,"","",adModeUnknown);   
45.     }   
46.     //捕捉异常   
47.     
48.     catch(_com_error e)   
49.     {   
50.         //显示错误信息   
51.         AfxMessageBox(e.Description());   
52.     }   
53. }   
55. //以下用于测试数据库联接   
56. void AdoConn::TestAdoConn(CString servername,CString username,CString password)   
57. {   
58.     //初始化OLE/COM库环境     
59.     ::CoInitialize(NULL);   
60.     try   
61.     {   
62.         //创建Connection对象   
63.         m_pConnection.CreateInstance("ADODB.Connection");   
64.         
65.         //设置连接字符串，必须是BSTR型或者_bstr_t类型
66.         char path[ MAX_PATH ] = { '/0' }; 
67.         CString DataSource="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=";
68.         GetCurrentDirectory( MAX_PATH, path ); 
69.         CString pathstr;
70.         pathstr.Format("%s",path);
71.         DataSource +=pathstr;
72.         DataSource += "//info.mdb"; 
73.         DataSource +=";Persist Security Info=False";
74.         _bstr_t   strConnect   =   (_bstr_t)DataSource;     
75.         m_pConnection->Open(strConnect,"","",adModeUnknown);   
76.     }   
77.     //捕捉异常   
78.     
79.     catch(_com_error e)   
80.     {   
81.         //显示错误信息   
82.         AfxMessageBox(e.Description());   
83.     }   
84. }   
87. //执行查询   
88. _RecordsetPtr& AdoConn::GetRecordSet(_bstr_t bstrSQL)   
89. {   
90.     try   
91.     {   
92.         //连接数据库，如果Connection对象为空，则重新连接数据库   
93.         if(m_pConnection==NULL)   
94.             OnInitAdoConn();   
95.         //创建记录集对象   
96.         m_pRecordset.CreateInstance(__uuidof(Recordset));   
97.         //取得表中的记录   
98.         m_pRecordset->Open(bstrSQL,m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);   
99.     }   
100.     //捕捉异常   
101.     catch(_com_error e)   
102.     {   
103.         //显示错误信息   
104.         AfxMessageBox(e.Description());   
105.     }   
106.     //返回记录集   
107.     return m_pRecordset;   
108. }   
110. //执行SQL语句，Insert Update _variant_t   
111. BOOL AdoConn::ExecuteSQL(_bstr_t bstrSQL)   
112. {   
113.     //_variant_t RecordsAffected;   
114.     try   
115.     {   
116.         //是否已经连接数据库   
117.         if(m_pConnection ==NULL)   
118.             OnInitAdoConn();   
119.         //Connection对象的Execute方法:(_bstr_t CommandText,     
120.         //VARIANT * RecordsAffected,long Options   )     
121.         //其中CommandText是命令字串，通常是SQL命令。   
122.         //参数RecordsAffected是操作完成后所影响的行数,     
123.         //参数Options表示CommandText的类型：adCmdText-文本命令；adCmdTable-表名   
124.         //adCmdProc-存储过程；adCmdUnknown-未知   
125.         m_pConnection->Execute(bstrSQL,NULL,adCmdText);   
126.         return true;   
127.     }   
128.     catch(_com_error e)   
129.     {   
130.         AfxMessageBox(e.Description());   
131.         return false;   
132.     }   
133. }   
135. void AdoConn::ExitConnect()   
136. {   
137.     //关闭记录集和连接   
138.     if (m_pRecordset !=NULL)   
139.         m_pRecordset->Close();   
140.     m_pConnection->Close();   
141.     //释放环境   
142.     ::CoUninitialize();   
143. }

用法: AdoConn ado;ado.GetRecordSet((_bstr_t)"select * from table1");