上位机MFC如何使用ADO在数据库中删除记录

https://www.gkbc8.com/thread-15135-1-1.html同样也是在前面一帖子基础上实现删除功能。

上位机MFC如何使用ADO在数据库中删除记录

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. }

复制代码

请点击此处下载

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

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

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

  

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

  

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

  

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

  

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