工控编程吧
标题:
267上位机VC MFC使用ODBC自动注册数据源
[打印本页]
作者:
qq263946146
时间:
2016-5-1 14:29
标题:
267上位机VC MFC使用ODBC自动注册数据源
(, 下载次数: 0)
上传
点击文件名下载附件
267上位机VC MFC使用ODBC自动注册数据源
功能展示
数据源利用系统自带的
ODBC
管理器手动注册不够灵活,项目的可移植性不好,让用户来注册数据源也实在麻烦,我们当前例程实现用代码自动注册数据源的功能,效果如图,事先准备一数据库文件,如果例程的文件
E:\\
每日任务
\\Student.mdb
,然后程序在初始化时调用函数
SQLConfigDataSource()
就可实现数据源的调用;
要点提示
1.我们程序自动注册数据源的步骤如下:
生成Cdatabase类的对象,生成Crecordset类对象,调用SQLConfigDataSource函数注册数据源,
调用Cdatabase类的成员函数OpenEx()连接数据源,调用Crecordset类的成员函数Open()打开记录集
2. SQLConfigDataSource()函数所在的头文件为ODBCINST.H所以在使用函数前包含头文件,另外使用例程时记得修改SQLConfigDataSource()函数的参数为自己的,如数据库文件全路径名,数据源名记得修改;
实现功能
1.新建一视窗派生于CListView的单文档的应用程序;
2.在视窗类中包含两头文件#include <afxdb.h>//数据库支持头文件
//SQLConfigDataSource()函数所在的头文件,此函数自动注册数据源
#include <ODBCINST.H>
3.在视窗类中添加三成员变量public:
CDatabase m_DB;
CListCtrl*m_List;//列表视图控件的指针
CRecordset* m_Set;//记录集对象的指针
并在构造函数中初始化,在析构函数中删除
CGkbc8View::CGkbc8View()
{
m_Set=NULL;
m_List=&GetListCtrl();//获取列表视图控件
m_dwDefaultStyle|=LVS_REPORT;//以报表的格式显示
}
CGkbc8View::~CGkbc8View()
{
if(m_Set!=NULL)
delete m_Set;
}
复制代码
4.在视窗中化函数OnInitialUpdate()中注册数据源,并连接记录集显示数据
void CGkbc8View::OnInitialUpdate()
{
CListView::OnInitialUpdate();
//<>
if(m_Set==NULL)
{
if(!SQLConfigDataSource
(
NULL, //父窗口指针;
ODBC_ADD_DSN, //添加的数据源的类型;
"Microsoft Access Driver (*.mdb)",//驱动程序名;
//属性:
"DSN=Students\0" //数据源名
"Description=工控编程吧gkbc8.com 测试用\0" //数据源的说明
"FileType=Microsoft Access\0" //数据源文件类型
"DBQ=E:\\每日任务\\Student.mdb\0"//数据库文件全路径名
//在根据现有数据设置列的数据类型时所要扫描的行数。 可以为 1 到 16,
//默认值为 8;如果设置为 0,将扫描 所有行。(如果数字超出界限,会返回一个错误)
"MaxScanRows=0\0"
)
)
{
AfxMessageBox("创建数据源失败!!");
return;
}
m_Set=new CRecordset(&m_DB);
if(!m_DB.OpenEx(_T("DSN=Students"),0))
{
AfxMessageBox("打开数据源失败!!");
return;
}
m_Set->Open(CRecordset::dynaset,_T("Select * from Basic"));
}
int i=0,j=0;
CODBCFieldInfo DbFi;//存储记录集字段信息的结构体
LV_COLUMN m_Lc;//存储列信息的结构体
m_Lc.mask=LVCF_FMT|LVCF_WIDTH|LVCF_TEXT|LVCF_SUBITEM;//设置列属性
复制代码
//读取记录集的字段信息
int nDBFields=m_Set->GetODBCFieldCount();
for(i=0;i<nDBFields;i++)
{
m_Set->GetODBCFieldInfo(i,DbFi);
m_Lc.iSubItem=i;
m_Lc.fmt=LVCFMT_CENTER;
m_Lc.cx=DbFi.m_strName.GetLength()*10+20;
m_Lc.pszText=DbFi.m_strName.GetBuffer(DbFi.m_strName.GetLength());
GetListCtrl().InsertColumn(i,&m_Lc);
}
//根据记录集的数据信息添加行
LV_ITEM m_item;//条目结构体对象
CString string;//字符串临时变量
CDBVariant DbVariant;
i=0;
if(m_Set->IsEOF())//记录集是否为空
{
AfxMessageBox("记录集没有记录");
return;
}
m_Set->MoveFirst();//从第一个记录开始
while(m_Set->IsEOF()==0)//是否到达最后一个记录
{
m_item.mask=LVIF_TEXT;
m_item.iItem=i;
m_item.iSubItem=0;
m_Set->GetFieldValue((short)0,string);
m_item.pszText=string.GetBuffer(string.GetLength());
m_List->InsertItem(&m_item);//插入条目
//显示列数据
for(j=1;j<nDBFields;j++)
{
m_Set->GetFieldValue((short)j,string);
m_List->SetItemText(i,j,string.GetBuffer(string.GetLength()));
}
m_Set->MoveNext();//下移记录
i++;
}
}
复制代码
我们来演示功能实现的整个过程
[iqiyi]http://player.video.qiyi.com/2df3782c286aaae1ab99cd48d9cb0c49/0/0/w_19rsu1n7e1.swf-albumId=6383581509-tvId=6383581509-isPurchase=0-cnId=12[/iqiyi]
(, 下载次数: 0)
上传
点击文件名下载附件
[note]1[/note]
欢迎光临 工控编程吧 (https://www.gkbc8.com/)
Powered by Discuz! X3.4