工控编程吧

标题: 上位机MFC如何使用ADO在数据库中添加记录 [打印本页]

---

作者: qq263946146    时间: 2019-8-9 12:16
标题: 上位机MFC如何使用ADO在数据库中添加记录
https://www.gkbc8.com/thread-15134-1-1.html
当前例程在前面例程基础上，添加一个按钮，实现添加数据功能
(, 下载次数: 5)

上传

点击文件名下载附件
如上图，点击第三个按钮，可以任意向数据库不回数据。
按钮代码为

1. 
   
2. void CGkbc8Dlg::OnButton2()
   
3. {
   
4.         if (!(m_pRecordset->State & adStateOpen))
   
5.         {
   
6.                 AfxMessageBox((_T("记录集未打开。")));
   
7.                 return;
   
8.         }
   
9. 
   
10.         static long nIndex =0;
    
11.         nIndex++;
    
12.         CString strName;
    
13.         strName.Format("工控编程吧%d",nIndex);
    
14.         //添加记录集
    
15.         m_pRecordset->AddNew();
    
16.         m_pRecordset->PutCollect(_variant_t(_T("NAME")),
    
17.                 _variant_t(strName));
    
18.         m_pRecordset->PutCollect(_variant_t(_T("AGE")),
    
19.                 _variant_t(nIndex));
    
20.         m_pRecordset->Update();
    
21. 
    
22.         //读取记录集
    
23.         CListCtrl* pListCtrl = (CListCtrl*)GetDlgItem(IDC_LIST);
    
24.         pListCtrl->DeleteAllItems();
    
25.         if (m_pRecordset->BOF && m_pRecordset->adoEOF)
    
26.         {
    
27.                 return;
    
28.         }
    
29.         m_pRecordset->MoveFirst();
    
30.         int n = 0;
    
31.         while (!m_pRecordset->adoEOF)
    
32.         {
    
33.                 _variant_t varValue;
    
34.                 CString strName = _T("");
    
35.                 int nAge = 0;
    
36. 
    
37.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("NAME")));
    
38.                 if (varValue.vt != VT_NULL)
    
39.                 {
    
40.                         strName = varValue.bstrVal;
    
41.                 }
    
42.                 else
    
43.                 {
    
44.                         strName = _T("");
    
45.                 }
    
46. 
    
47.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("AGE")));
    
48.                 if (varValue.vt != VT_NULL)
    
49.                 {
    
50.                         nAge = varValue.intVal;
    
51.                 }
    
52.                 else
    
53.                 {
    
54.                         nAge = 0;
    
55.                 }
    
56. 
    
57.                 //刷新ListCtrl
    
58.                 CString strText = _T("");
    
59.                 strText.Format(_T("%d"), n + 1);
    
60.                 pListCtrl->InsertItem(n, strText);
    
61.                 strText.Format(_T("%s"), strName);
    
62.                 pListCtrl->SetItemText(n, 1, strText);
    
63.                 strText.Format(_T("%d"), nAge);
    
64.                 pListCtrl->SetItemText(n, 2, strText);
    
65.                 n++;
    
66. 
    
67.                 m_pRecordset->MoveNext();
    
68.         }
    
69. }
    

复制代码

(, 下载次数: 0)

上传

点击文件名下载附件
[MFC408]1[/MFC408]
[weixinlianxi]1[/weixinlianxi]

---

欢迎光临 工控编程吧 (https://www.gkbc8.com/)

Powered by Discuz! X3.4