工控编程吧
标题:
268上位机VC MFC使用ODBC直接执行SQL语句
[打印本页]
作者:
qq263946146
时间:
2016-5-1 14:33
标题:
268上位机VC MFC使用ODBC直接执行SQL语句
(, 下载次数: 4)
上传
点击文件名下载附件
268上位机VC MFC使用ODBC直接执行SQL语句
功能展示
自动注册了数据源,可以正常显示数据表数据信息,如果我们要想查询表中的数据,如果当前例程中要查询表中学生的数学成绩该如何处理?方法有很多,简单直接的方法就是执行
SQL
语句,当前例程通过自动注册指定位置的数据库文件,显示数据表数据后,点击查询成绩可执行
SQL
语句查询学生的数学成绩,效果如图;
要点提示
1.当前例程在根目录提供一个数据库文件,数据库有两个表;
2.要想在ODBC程序中执行SQL语句实现 查询操作,先要关闭记录集,再调用CRecordSet类的成员函数Open,指定SQL语句就可以了,如我们当前例程中实现 的代码
CStringsExplore="SELECT * FROM Course;";
if(m_Set->IsOpen())
m_Set->Close();
if(!m_Set->IsOpen())
m_Set->Open(CRecordset::dynaset,sExplore);
实现功能
1.新建一视窗派生于CListView的单文档的应用程序;
2.在视窗类中包含两头文件#include<afxdb.h>
#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=工控编程吧测试用\0" //数据源的说明
"FileType=Microsoft Access\0" //数据源文件类型
"DBQ=E:\\每日任务\\STUDENTSINFO.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 LvColumn;//存储列信息的结构体
LvColumn.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);
LvColumn.iSubItem=i;
复制代码
LvColumn.fmt=LVCFMT_CENTER;
LvColumn.cx=DbFi.m_strName.GetLength()*10+20;
LvColumn.pszText=DbFi.m_strName.GetBuffer(DbFi.m_strName.GetLength());
GetListCtrl().InsertColumn(i,&LvColumn);
}
//根据记录集的数据信息添加行
LV_ITEM LvItem;//条目结构体对象
CString string;//字符串临时变量
CDBVariant DbVariant;
i=0;
if(m_Set->IsEOF())//记录集是否为空
{
AfxMessageBox("记录集没有记录");
return;
}
m_Set->MoveFirst();//从第一个记录开始
while(m_Set->IsEOF()==0)//是否到达最后一个记录
{
LvItem.mask=LVIF_TEXT;
LvItem.iItem=i;
LvItem.iSubItem=0;
m_Set->GetFieldValue((short)0,string);
LvItem.pszText=string.GetBuffer(string.GetLength());
m_List->InsertItem(&LvItem);//插入条目
//显示列数据
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++;
}
}
复制代码
5.添加菜单项<查看成绩>关联函数,实现执行SQL语句查询功能
void CGkbc8View::OnCheck()
{
CString sExplore="SELECT * FROM Course;";
m_List->SetRedraw(TRUE);
m_List->DeleteAllItems();
CHeaderCtrl* pHeaderCtrl=(CHeaderCtrl*)m_List->GetDlgItem(0);
复制代码
int nClCount=pHeaderCtrl->GetItemCount();
for(int i=nClCount-1;i>=0;i--)
int j=m_List->DeleteColumn(i);
if(m_Set->IsOpen())
m_Set->Close();
if(!m_Set->IsOpen())
m_Set->Open(CRecordset::dynaset,sExplore);
int j=0;
CODBCFieldInfo DbFi;//存储记录集字段信息的结构体
LV_COLUMN LvColumn;//存储列信息的结构体
LvColumn.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);
LvColumn.iSubItem=i;
LvColumn.fmt=LVCFMT_CENTER;
LvColumn.cx=DbFi.m_strName.GetLength()*10+20;
LvColumn.pszText=DbFi.m_strName.GetBuffer(DbFi.m_strName.GetLength());
GetListCtrl().InsertColumn(i,&LvColumn);
}
//根据记录集的数据信息添加行
LV_ITEM LvItem;//条目结构体对象
CString string;//字符串临时变量
CDBVariant DbVariant;
i=0;
if(m_Set->IsEOF())//记录集是否为空
{
AfxMessageBox("记录集没有记录");
return;
}
m_Set->MoveFirst();//从第一个记录开始
while(m_Set->IsEOF()==0)//是否到达最后一个记录
{
LvItem.mask=LVIF_TEXT;
LvItem.iItem=i;
LvItem.iSubItem=0;
m_Set->GetFieldValue((short)0,string);
LvItem.pszText=string.GetBuffer(string.GetLength());
m_List->InsertItem(&LvItem);//插入条目
//显示列数据
复制代码
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/6a774a5d7e0f0068105f99d9d0e0d6df/0/0/w_19rsu1p2zp.swf-albumId=6383686409-tvId=6383686409-isPurchase=0-cnId=12[/iqiyi]
(, 下载次数: 0)
上传
点击文件名下载附件
[note]1[/note]
欢迎光临 工控编程吧 (https://www.gkbc8.com/)
Powered by Discuz! X3.4