工控编程吧

标题: 279上位机VC MFC使用DAO综合查询记录 [打印本页]

---

作者: qq263946146    时间: 2016-5-7 23:16
标题: 279上位机VC MFC使用DAO综合查询记录

(, 下载次数: 0)

上传

点击文件名下载附件

279上位机VC MFC使用DAO综合查询记录

功能展示

在用DAO进行编写数据库程序时，查询功能也是很常用的一种功能，我们当前例程使用CDaoTableDef类演示如何查询数据库，效果如图，可以通过<按评定级别查询><按年龄区查询>也可以<属性查询>

要点提示

1.在对记录集操作之后，最后退出程序，一定要把记录集指针重新放置在首位置，随后调用Close函数关闭该记录对象；

2. COleVariant类型的变量在转化为长整形或字符串类型时，要恰当的V_I4(COleVariant&VAR)函数，以免数据出现截断错误；

实现功能

1.新建基于单文档应用程序，在创建过程中选择基于DAO，数据库文件选择例程根目录数据库文件，表选择course，具体的创建操作过程可以参考视频演示；

2.根据例程界面添加两组合框控件ID为IDC_COMBO1， IDC_COMBO2，再添加一编辑框控件ID为IDC_AGEEDIT

3，添加两列表框控件ID分别 为IDC_ITEMLIST， IDC_FEATURELIST用于显示搜索的结果；

4.添加三按钮<按评定级别查询><按年龄区查询><属性查询>用于执行查询操作，关联点击函数

1. void CGkbc8View::OnComreq() //按评定级别查询
   
2. {
   
3.         CString sCombo1Text;
   
4.         CComboBox *pComboBox1 = (CComboBox *)GetDlgItem(IDC_COMBO1);
   
5.         pComboBox1->GetLBText(pComboBox1->GetCurSel(),sCombo1Text);
   
6. 
   
7.         CListCtrl *pItemList = (CListCtrl *)GetDlgItem(IDC_ITEMLIST);
   
8.         pItemList->DeleteAllItems();
   
9. 
   
10.     CGkbc8Set DaoRecordset;
    
11.         CString str;
    
12.         str.Format("%s",DaoRecordset.GetDefaultDBName());
    
13. 
    
14.         CDaoDatabase db;
    
15.         db.Open(str);
    
16.         CDaoQueryDef DaoQueryDef(&db);
    
17.         CString sql;
    
18.         sql.Format("Select * from course WHERE comment='%s'",sCombo1Text);
    
19.         DaoQueryDef.Create(NULL,sql);
    
20.         CDaoRecordset rs(&db);
    
21.         rs.Open(&DaoQueryDef);
    

复制代码

1. COleVariant var;
   
2.     CString str1;
   
3.         int nItem;
   
4.         rs.MoveFirst();
   
5.         while(!rs.IsEOF())
   
6.         {
   
7.                 var=rs.GetFieldValue(0);
   
8.         str1.Format(_T("%ld"),V_I4(&var));
   
9.         nItem=pItemList->InsertItem(0,str1);
   
10.         var=rs.GetFieldValue(1);
    
11.         str1.Format(_T("%s"),V_I4(&var));
    
12.             pItemList->SetItemText(nItem,1,str1);
    
13.                 var=rs.GetFieldValue(2);
    
14.         str1.Format(_T("%ld"),V_I4(&var));
    
15.                 pItemList->SetItemText(nItem,2,str1);
    
16.                 var=rs.GetFieldValue(3);
    
17.         str1.Format(_T("%s"),V_I4(&var));
    
18.                 pItemList->SetItemText(nItem,3,str1);
    
19.                 var=rs.GetFieldValue(4);
    
20.         str1.Format(_T("%s"),V_I4(&var));
    
21.                 pItemList->SetItemText(nItem,4,str1);
    
22.                 rs.MoveNext();
    
23.         }
    
24.         rs.MoveFirst();
    
25.         rs.Close();
    
26.         db.Close();        
    
27. }
    
28. void CGkbc8View::OnAgereq() //按年龄区查询
    
29. {
    
30.         long nAge = (long)GetDlgItemInt(IDC_AGEEDIT);
    
31.         CString sCombo2Text;
    
32.         CComboBox *pComboBox2 = (CComboBox *)GetDlgItem(IDC_COMBO2);
    
33.         pComboBox2->GetLBText(pComboBox2->GetCurSel(),sCombo2Text);
    
34. //
    
35.         CListCtrl *pItemList = (CListCtrl *)GetDlgItem(IDC_ITEMLIST);
    
36.         pItemList->DeleteAllItems();
    
37.         CDaoDatabase db;
    
38.     CGkbc8Set DaoRecordset;
    
39.         CString str;
    
40.         str.Format("%s",DaoRecordset.GetDefaultDBName());
    
41.         db.Open(str);
    
42.         CDaoQueryDef DaoQueryDef(&db);
    
43.         CString sql;
    

复制代码

1. if(sCombo2Text=="大于")
   
2.         sql.Format("Select * from course WHERE age>%d",nAge);
   
3.         else if(sCombo2Text=="小于")
   
4.             sql.Format("Select * from course WHERE age<%d",nAge);
   
5.         else
   
6.                         sql.Format("Select * from course WHERE age=%d",nAge);
   
7.         DaoQueryDef.Create(NULL,sql);
   
8.         CDaoRecordset rs(&db);
   
9.         rs.Open(&DaoQueryDef);
   
10. 
    
11.         COleVariant var;
    
12.     CString str1;
    
13.         int nItem;
    
14.         rs.MoveFirst();
    
15.         while(!rs.IsEOF())
    
16.         {
    
17.                 var=rs.GetFieldValue(0);
    
18.         str1.Format(_T("%ld"),V_I4(&var));
    
19.         nItem=pItemList->InsertItem(0,str1);
    
20.         var=rs.GetFieldValue(1);
    
21.         str1.Format(_T("%s"),V_I4(&var));
    
22.             pItemList->SetItemText(nItem,1,str1);
    
23.                 var=rs.GetFieldValue(2);
    
24.         str1.Format(_T("%ld"),V_I4(&var));
    
25.                 pItemList->SetItemText(nItem,2,str1);
    
26.                 var=rs.GetFieldValue(3);
    
27.         str1.Format(_T("%s"),V_I4(&var));
    
28.                 pItemList->SetItemText(nItem,3,str1);
    
29.                 var=rs.GetFieldValue(4);
    
30.         str1.Format(_T("%s"),V_I4(&var));
    
31.                 pItemList->SetItemText(nItem,4,str1);
    
32.                 rs.MoveNext();
    
33.         }
    
34.         rs.MoveFirst();
    
35.         rs.Close();
    
36.         db.Close();        
    
37. }
    
38. void CGkbc8View::OnFeabutton() //属性查询
    
39. {
    
40.         CListCtrl *pList = (CListCtrl *)GetDlgItem(IDC_FEATURELIST);
    
41.         pList->DeleteAllItems();
    
42.         //
    
43.         CDaoDatabase db;
    

复制代码

1. CGkbc8Set DaoRecordset;
   
2. 
   
3.         CString str;
   
4.         str.Format("%s",DaoRecordset.GetDefaultDBName());
   
5.         db.Open(str);
   
6.         CDaoQueryDef DaoQueryDef(&db);
   
7.         CString sql="Select * from course";
   
8.         DaoQueryDef.Create(NULL,sql);
   
9. 
   
10.         int num=(int)DaoQueryDef.GetFieldCount();
    
11.         CDaoFieldInfo fi;
    
12.         CString str1;
    
13.     CString str2;
    
14.     CString str3;
    
15.         for(int i=0;i<num;i++)
    
16.         {
    
17.                 DaoQueryDef.GetFieldInfo(i,fi,AFX_DAO_PRIMARY_INFO);
    
18.         str1=fi.m_strName;
    
19.                 str2.Format("%d",fi.m_nType);
    
20.                 str3.Format("%d",fi.m_lSize);
    
21.         int n=pList->InsertItem(0,str1);
    
22.             pList->SetItemText(n,1,str2);
    
23.         pList->SetItemText(n,2,str3);
    
24.         }
    
25.         db.Close();        
    
26. }
    

复制代码

5.记得在程序初始化时初始化列表控件，及组合框数据

我们来演示整个功能实现过程

[iqiyi]http://player.video.qiyi.com/adca77f2749d96eba45fc965792b3a26/0/0/w_19rstsp4lt.swf-albumId=6397818109-tvId=6397818109-isPurchase=0-cnId=12[/iqiyi]

(, 下载次数: 0)

上传

点击文件名下载附件

[note]1[/note]

---

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

Powered by Discuz! X3.4