260上位机VC MFC使用ODBC动态切换数据表
260上位机VC MFC使用ODBC动态切换数据表
功能展示
ODBC程序时有时会在同一数据源中来回切换数据表,显示各表中的不同数据,我们当前例程就实现了两表间的动态切换功能,程序初始化运行时会调用<连接—数据源>按钮连接上数据源,再点击<切换数据表>按钮会在已连接的数据源中切换连接两表,效果如图;
要点提示
1,在连接了数据源后就可以动态连接表,表的连接实现可以通过CRecordSet的成员函数Open()实现,此函数通过不同SQL语言就可连接不同的表,要注意的是在连接其他表之前,记得关闭已经连接的表; 2.例程中有两静态文本控件ID,IDC_NAME,IDC_GRADYEAR要注意,不然切换表后对应的提示信息会不匹配; 实现功能 1.新建基于对话框的应用程序; 2.按照例程界面给主对话框添加三个编辑框ID分别 为IDC_STUID,IDC_STUNAME,IDC_STUGRADYEAR分别关联变量CString m_ID;CString m_Name; CString m_Year; 3.再给主对话框添加两变量private:CDatabase m_DB; CRecordset* m_Set; 及一头文件#include "Afxdb.h"//数据库支持 4.分别添加按钮控件<连接--数据源><第一条记录><下一条记录><上一条记录><最后一条记录>分别关联函数 - void CGkbc8Dlg::OnConnect()
- {
- m_Set=new CRecordset(&m_DB);
- if(!m_DB.OpenEx(_T("DSN=student"),0))//连接数据源
- {
- AfxMessageBox("打开数据源失败!!");//报告错误
- return;
- }
- if(!m_Set->IsOpen())
- {
- m_Set->Open(CRecordset::dynaset,_T("Select * from 表1"));//选择数据表并打开
- }
- if(m_Set->IsEOF())//记录集是否为空
- {
- AfxMessageBox("记录集没有记录");
- return;
- }
复制代码- m_Set->MoveFirst();//第一个记录
- m_Set->GetFieldValue((short)0,m_ID);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)1,m_Name);//把第1 列赋给此控件
- m_Set->GetFieldValue((short)2,m_Year);//把第2 列赋给此控件
- UpdateData(FALSE);//更新对话框
- }
- void CGkbc8Dlg::OnSelect()
- {
- m_Set->MoveFirst();//第一个记录
- m_Set->GetFieldValue((short)0,m_ID);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)1,m_Name);//把第1 列赋给此控件
- m_Set->GetFieldValue((short)2,m_Year);//把第2 列赋给此控件
- UpdateData(FALSE);//更新对话框
- }
- void CGkbc8Dlg::OnRecordNext()
- {
- m_Set->MoveNext();//下一个记录开始
- m_Set->GetFieldValue((short)0,m_ID);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)1,m_Name);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)2,m_Year);//把第0 列赋给此控件
- UpdateData(FALSE);//更新对话框
- }
- void CGkbc8Dlg::OnRecordPrev()
- {
- m_Set->MovePrev();//上一个记录开始
- m_Set->GetFieldValue((short)0,m_ID);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)1,m_Name);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)2,m_Year);//把第0 列赋给此控件
- UpdateData(FALSE);//更新对话框
- }
- void CGkbc8Dlg::OnRecordLast()
- {
- m_Set->MoveLast();//最后一个记录开始
- m_Set->GetFieldValue((short)0,m_ID);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)1,m_Name);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)2,m_Year);//把第0 列赋给此控件
- UpdateData(FALSE);//更新对话框
- }
复制代码OnConnect()函数可以选择性在程序初始化是调用一次 5.再给主对话框添加一变量m_bSwitch,初始化为 m_bSwitch =FALSE;对话框资源中修改静态文本控件<姓名><毕业时间>ID分别为IDC_NAME, IDC_GRADYEAR, 添加一按钮<切换 数据表>关联函数,实现不同表间的切换功能 - void CGkbc8Dlg::OnSwitch()
- {
- if(m_Set->IsOpen())
- m_Set->Close();
- CWnd *pWnd1=GetDlgItem(IDC_NAME);//得到控件句柄
- CWnd *pWnd2=GetDlgItem(IDC_GRADYEAR);//
- if(m_bSwitch)
- {
- pWnd1->SetWindowText("姓名");
- pWnd2->SetWindowText("毕业时间");
- //选择数据表并打开
- m_Set->Open(CRecordset::dynaset,_T("Select * from 表1"));
- m_Set->MoveFirst();//第一个记录
- m_Set->GetFieldValue((short)0,m_ID);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)1,m_Name);//把第1 列赋给此控件
- m_Set->GetFieldValue((short)2,m_Year);//把第2 列赋给此控件
- UpdateData(FALSE);//更新对话框
- m_bSwitch=FALSE;
- }
- else
- {
- pWnd1->SetWindowText("家庭住址");
- pWnd2->SetWindowText("电话号码");
- //选择数据表并打开
- m_Set->Open(CRecordset::dynaset,_T("Select * from Basic"));
- m_Set->MoveFirst();//第一个记录
- m_Set->GetFieldValue((short)0,m_ID);//把第0 列赋给此控件
- m_Set->GetFieldValue((short)1,m_Name);//把第1 列赋给此控件
- m_Set->GetFieldValue((short)2,m_Year);//把第2 列赋给此控件
- UpdateData(FALSE);//更新对话框
- m_bSwitch=TRUE;
- }
- }
复制代码我们来演示下功能实现的整个过程
|