工控编程吧

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

---

作者: qq263946146    时间: 2019-8-9 12:20
标题: 上位机MFC如何使用ADO在数据库中删除记录
https://www.gkbc8.com/thread-15135-1-1.html同样也是在前面一帖子基础上实现删除功能。
(, 下载次数: 2)

上传

点击文件名下载附件

1. 
   
2. void CGkbc8Dlg::OnButton3()
   
3. {
   
4.         if (!(m_pRecordset->State & adStateOpen))
   
5.         {
   
6.                 AfxMessageBox((_T("记录集未打开。")));
   
7.                 return;
   
8.         }
   
9. 
   
10.         //获得记录集当前位置
    
11.         CListCtrl* pListCtrl = (CListCtrl*)GetDlgItem(IDC_LIST);
    
12.         POSITION pos = pListCtrl->GetFirstSelectedItemPosition();
    
13.         if (pos == NULL)
    
14.         {
    
15.                 return;
    
16.         }
    
17.         int nItem = pListCtrl->GetNextSelectedItem(pos);
    
18.        
    
19.         //删除记录集
    
20.         if (m_pRecordset->BOF && m_pRecordset->adoEOF)
    
21.         {
    
22.                 return;
    
23.         }
    
24.         m_pRecordset->MoveFirst();
    
25.         m_pRecordset->Move((long)nItem);
    
26.         m_pRecordset->Delete(adAffectCurrent);
    
27.         m_pRecordset->Update();
    
28. 
    
29.         //读取记录集
    
30.         pListCtrl->DeleteAllItems();
    
31.         if (m_pRecordset->BOF && m_pRecordset->adoEOF)
    
32.         {
    
33.                 return;
    
34.         }
    
35.         m_pRecordset->MoveFirst();
    
36.         int n = 0;
    
37.         while (!m_pRecordset->adoEOF)
    
38.         {
    
39.                 _variant_t varValue;
    
40.                 CString strName = _T("");
    
41.                 int nAge = 0;
    
42. 
    
43.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("NAME")));
    
44.                 if (varValue.vt != VT_NULL)
    
45.                 {
    
46.                         strName = varValue.bstrVal;
    
47.                 }
    
48.                 else
    
49.                 {
    
50.                         strName = _T("");
    
51.                 }
    
52. 
    
53.                 varValue = m_pRecordset->GetCollect(_variant_t(_T("AGE")));
    
54.                 if (varValue.vt != VT_NULL)
    
55.                 {
    
56.                         nAge = varValue.intVal;
    
57.                 }
    
58.                 else
    
59.                 {
    
60.                         nAge = 0;
    
61.                 }
    
62. 
    
63.                 //刷新ListCtrl
    
64.                 CString strText = _T("");
    
65.                 strText.Format(_T("%d"), n + 1);
    
66.                 pListCtrl->InsertItem(n, strText);
    
67.                 strText.Format(_T("%s"), strName);
    
68.                 pListCtrl->SetItemText(n, 1, strText);
    
69.                 strText.Format(_T("%d"), nAge);
    
70.                 pListCtrl->SetItemText(n, 2, strText);
    
71.                 n++;
    
72. 
    
73.                 m_pRecordset->MoveNext();
    
74.         }
    
75. }

复制代码

(, 下载次数: 0)

上传

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

---

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

Powered by Discuz! X3.4