上位机MFC如何使用ADO在数据库中移动记录集

1.初始化COM库
        if (!SUCCEEDED(CoInitialize(NULL)))
        {
                ::AfxMessageBox(_T("Failed to initialize COM!"));
                return FALSE;
        }

2.导入ADO库
#import "c:\program files\common files\system\ado\msado15.dll"\
                no_namespace\
                rename("EOF", "adoEOF")


3.定义变量与自定义操作数据库的函数
BOOL OpenDatabase(LPCTSTR lpszConnect, long nOptions=adConnectUnspecified);
BOOL CloseDatabase();
BOOL OpenRecordset(LPCTSTR lpszSource, long nCursorType=adOpenDynamic,                           long nLockType=adLockOptimistic, long nOptions=adCmdText);
BOOL CloseRecorset();
_ConnectionPtr m_pConnection;
_RecordsetPtr m_pRecordset;

最后 就是使用按钮来操作数据库
如前移，后移等

1. 
   
2. void CGkbc8Dlg::OnMovefirst()
   
3. {
   
4.         if (!(m_pRecordset->State & adStateOpen))
   
5.         {
   
6.                 AfxMessageBox((_T("记录集未打开。")));
   
7.                 return;
   
8.         }
   
9. 
   
10.         //判断记录集是否为空
    
11.         if (m_pRecordset->BOF && m_pRecordset->adoEOF)
    
12.         {
    
13.                 return;
    
14.         }
    
15. 
    
16.         //移动记录集
    
17.         try
    
18.         {
    
19.                 m_pRecordset->MoveFirst();
    
20.         }
    
21.         catch(_com_error e)
    
22.         {
    
23.                 TRACE(_T("%s\n"), e.ErrorMessage());
    
24.                 return;
    
25.         }
    
26.                
    
27.         //读取记录集
    
28.         _variant_t varValue;
    
29.         CString strName = _T("");
    
30.         int nAge = 0;
    
31.         try
    
32.         {
    
33.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("NAME")));
    
34.                 if (varValue.vt != VT_NULL)
    
35.                 {
    
36.                         strName = varValue.bstrVal;
    
37.                 }
    
38.                 else
    
39.                 {
    
40.                         strName = _T("");
    
41.                 }
    
42. 
    
43.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("AGE")));
    
44.                 if (varValue.vt != VT_NULL)
    
45.                 {
    
46.                         nAge = varValue.intVal;
    
47.                 }
    
48.                 else
    
49.                 {
    
50.                         nAge = 0;
    
51.                 }
    
52.         }
    
53.         catch(_com_error e)
    
54.         {
    
55.                 TRACE(_T("%s\n"), e.ErrorMessage());
    
56.                 return;
    
57.         }
    
58. 
    
59.         //刷新
    
60.         SetDlgItemText(IDC_NAME, strName);
    
61.         SetDlgItemInt(IDC_AGE, nAge);
    
62. }
    
63. 
    
64. void CGkbc8Dlg::OnMovelast()
    
65. {
    
66. if (!(m_pRecordset->State & adStateOpen))
    
67.         {
    
68.                 AfxMessageBox((_T("记录集未打开。")));
    
69.                 return;
    
70.         }
    
71. 
    
72.         //判断记录集是否为空
    
73.         if (m_pRecordset->BOF && m_pRecordset->adoEOF)
    
74.         {
    
75.                 return;
    
76.         }
    
77. 
    
78.         //移动记录集
    
79.         try
    
80.         {
    
81.                 m_pRecordset->MoveLast();
    
82.         }
    
83.         catch(_com_error e)
    
84.         {
    
85.                 TRACE(_T("%s\n"), e.ErrorMessage());
    
86.                 return;
    
87.         }
    
88.        
    
89.         //读取记录集
    
90.         _variant_t varValue;
    
91.         CString strName = _T("");
    
92.         int nAge = 0;
    
93.         try
    
94.         {
    
95.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("NAME")));
    
96.                 if (varValue.vt != VT_NULL)
    
97.                 {
    
98.                         strName = varValue.bstrVal;
    
99.                 }
    
100.                 else
     
101.                 {
     
102.                         strName = _T("");
     
103.                 }
     
104. 
     
105.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("AGE")));
     
106.                 if (varValue.vt != VT_NULL)
     
107.                 {
     
108.                         nAge = varValue.intVal;
     
109.                 }
     
110.                 else
     
111.                 {
     
112.                         nAge = 0;
     
113.                 }
     
114.         }
     
115.         catch(_com_error e)
     
116.         {
     
117.                 TRACE(_T("%s\n"), e.ErrorMessage());
     
118.                 return;
     
119.         }
     
120. 
     
121.           //刷新
     
122.         SetDlgItemText(IDC_NAME, strName);
     
123.         SetDlgItemInt(IDC_AGE, nAge);
     
124. }
     
125. 
     
126. void CGkbc8Dlg::OnMovenext()
     
127. {
     
128.         if (!(m_pRecordset->State & adStateOpen))
     
129.         {
     
130.                 AfxMessageBox((_T("记录集未打开。")));
     
131.                 return;
     
132.         }
     
133. 
     
134.         //判断记录集是否为空
     
135.         if (m_pRecordset->BOF && m_pRecordset->adoEOF)
     
136.         {
     
137.                 return;
     
138.         }
     
139. 
     
140.         //移动记录集
     
141.         try
     
142.         {
     
143.                 m_pRecordset->MoveNext();
     
144. 
     
145.                 if (m_pRecordset->adoEOF)
     
146.                 {
     
147.                         m_pRecordset->MoveFirst();
     
148.                 }
     
149.         }
     
150.         catch(_com_error e)
     
151.         {
     
152.                 TRACE(_T("%s\n"), e.ErrorMessage());
     
153.                 return;
     
154.         }
     
155. 
     
156.         //读取记录集
     
157.         _variant_t varValue;
     
158.         CString strName = _T("");
     
159.         int nAge = 0;
     
160.         try
     
161.         {
     
162.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("NAME")));
     
163.                 if (varValue.vt != VT_NULL)
     
164.                 {
     
165.                         strName = varValue.bstrVal;
     
166.                 }
     
167.                 else
     
168.                 {
     
169.                         strName = _T("");
     
170.                 }
     
171. 
     
172.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("AGE")));
     
173.                 if (varValue.vt != VT_NULL)
     
174.                 {
     
175.                         nAge = varValue.intVal;
     
176.                 }
     
177.                 else
     
178.                 {
     
179.                         nAge = 0;
     
180.                 }
     
181.         }
     
182.         catch(_com_error e)
     
183.         {
     
184.                 TRACE(_T("%s\n"), e.ErrorMessage());
     
185.                 return;
     
186.         }
     
187. 
     
188.           //刷新
     
189.         SetDlgItemText(IDC_NAME, strName);
     
190.         SetDlgItemInt(IDC_AGE, nAge);
     
191. }
     

复制代码

上位机MFC如何使用ADO在数据库中移动记录集

请点击此处下载

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:上位机MFC如何使用ADO在数据库中移动记录集.rar 
文件大小:183.79 KB  售价:1金币
下载权限: 不限 以上或 VIP会员   [购买捐助会员]   [充值积分]  

  

上位机VC MFC程序开发精典实例大全源码与视频讲解配套下载408例

  

经历1年的编程与录制点击进入查看

  

如果您认可，可联系功能定制！

  

如果您着急，充值会员可直接联系发您资料！