MFC通过ODBC连接Mysql程序

简介:

经过这个礼拜的折腾,先是安装Mysql,学习下Mysql基本语句操作,学习下MFC操作,通过ODBC连接Mysql,参考各种网上的实例程序,

加上自己的不断调试,修改,终于将这一可对数据库进行基本操作的程序写完(由于还是新手,,其中肯定有很多不完善的地方,

希望各位高手帮忙指出。)

下面记录下程序:

安装建立mysql,连接ODBC以及通过MFC拖控件这些过程网上很多,就不写了,说一下我的mysql中有database mytest 内有表格mytable,如下:

1、先通过vs2005建立一个MFC工程,vs自动生成文件如图:

2、打开stdafx.h头文件,添加如下语句

#include <odbcinst.h> 
#include "afxdb.h"

这两个头文件应该是定义了后面用到的数据库操作类CDataBase、CRecodSet .etc的。

3、剩下的基本都是在ODBCTestDlg.cpp文件操作

  打开数据库进行数据显示:

  在OnInitDialog函数中添加如下语句

  

复制代码
View Code
1 m_list.InsertColumn(1, _T("Name"), LVCFMT_LEFT,80);//在Listctrl控件上添加列,与数据库table对应。
2 m_list.InsertColumn(2, _T("Sex"), LVCFMT_LEFT,80);
3 m_list.InsertColumn(3, _T("Grade"), LVCFMT_LEFT,80);
4 CString cmdStr = _T("SELECT * FROM mytable order by Name Desc");
5 m_show(cmdStr);
复制代码

 

1
m_show()函数中的内容完全可以全部放在OnInitDialog()中,但考虑到后面操作数据库时,每次都要写同样的操作,故将其写一函数中
复制代码
View Code
复制代码
 1 // get data from database and show them in list control
2 void CODBCTestDlg::m_show(CString cmdStr)
3 {
4 m_list.DeleteAllItems();
5 CDatabase db;
6 db.Open(NULL,FALSE,FALSE,L"ODBC;DSN=mydb;UID=root;PWD=123456");
7 CRecordset rs( &db );
8 rs.Open( CRecordset::forwardOnly, (L"%s", cmdStr));
9 //short nFields = rs.GetODBCFieldCount();
10 while(!rs.IsEOF())
11 {
12
13 CString varName;
14 rs.GetFieldValue(L"Name", varName);
15 m_list.InsertItem(0, varName);
16 CString varSex;
17 rs.GetFieldValue(L"Sex", varSex);
18 m_list.SetItemText(0, 1, varSex);
19 CString varGrade;
20 rs.GetFieldValue(L"Grade", varGrade);
21 m_list.SetItemText(0, 2, varGrade);
22 rs.MoveNext();
23 }
24 m_list.SetExtendedStyle(LVS_EX_FLATSB | LVS_EX_FULLROWSELECT | LVS_EX_GRIDLINES); // | LVS_SINGLESEL);
25 rs.Close();
26 db.Close();
27 }
复制代码
复制代码



1
这样已经可以在ListCtrl中显示数据库中得内容了。

4、操作数据库

  a、点击ListCtrl在Edit control中显示对应内容,为ListCtrl添加响应函数

  

复制代码
View Code
复制代码
 1 void CODBCTestDlg::OnLvnItemchangedList1(NMHDR *pNMHDR, LRESULT *pResult)
2 {
3 LPNMLISTVIEW pNMLV = reinterpret_cast<LPNMLISTVIEW>(pNMHDR);
4 // TODO: Add your control notification handler code here
5
6 #if 0
7 LPNMITEMACTIVATE lpNMItemActivate = (LPNMITEMACTIVATE)pNMHDR;
8 if (lpNMItemActivate != NULL)
9 {
10 nItem = lpNMItemActivate->iItem;
11 }
12 LV_ITEM lvitem = {0};
13 lvitem.iItem =nItem;
14 lvitem.iSubItem = 0;
15 lvitem.mask = LVIF_TEXT | LVIF_IMAGE | LVIF_PARAM;
16 m_list.GetItem(&lvitem);
17 m_control_edit_name.SetWindowText(lvitem.pszText);
18 #endif
19 int nIndex;
20 CString name, sex, grade;
21 //nIndex = m_list.GetSelectionMark();
22 nIndex = m_list.GetNextItem(-1, LVNI_ALL | LVNI_SELECTED);
23 if(-1 == nIndex)
24 nIndex = 0;
25 name = m_list.GetItemText(nIndex, 0);
26 sex = m_list.GetItemText(nIndex, 1);
27 grade = m_list.GetItemText(nIndex, 2);
28 m_control_edit_name.SetWindowText(name);
29 m_control_edit_sex.SetWindowText(sex);
30 m_control_edit_grade.SetWindowText(grade);
31
32 *pResult = 0;
33 }
复制代码
复制代码

  b、在mysql 中add数据函数

  

复制代码
View Code
复制代码
 1 void CODBCTestDlg::OnBnClickedAdd()
2 {
3 // TODO: Add your control notification handler code here
4 CDatabase db;
5 db.Open(NULL, FALSE, FALSE, _T("ODBC;DSN=mydb;UID=root;PWD=123456"));
6 CString str, Name, Sex, Grade;
7 m_control_edit_name.GetWindowText(Name);
8 m_control_edit_sex.GetWindowText(Sex);
9 m_control_edit_grade.GetWindowText(Grade);
10 //str = L"insert into mytable values('" + Name +L"','" + Sex +L"','" + Grade + L"')";
11 str.Format(L"insert into mytable values('%s','%s','%s')", Name, Sex, Grade);
12 db.ExecuteSQL(str);
13 db.Close();
14 CString cmdStr = _T("SELECT * FROM mytable order by name Desc");
15 m_show(cmdStr);
16 }
复制代码
复制代码

  c、在mysql中alter数据函数

复制代码
View Code
复制代码
 1 void CODBCTestDlg::OnBnClickedAlter()
2 {
3 // TODO: 在此添加控件通知处理程序代码
4 int nIndex;
5 CString name, sex, grade, newName, newSex, newGrade;
6 CString dataToAlter;
7 CDatabase db;
8 db.Open(NULL, FALSE, FALSE, _T("ODBC;DSN=mydb;UID=root;PWD="));
9 nIndex = m_list.GetSelectionMark();
10 if(-1 == nIndex)
11 {
12 AfxMessageBox(L"select a row data!");
13 }
14 else
15 {
16 name = m_list.GetItemText(nIndex, 0);
17 sex = m_list.GetItemText(nIndex, 1);
18 grade = m_list.GetItemText(nIndex, 2);
19 }
20 m_control_edit_name.GetWindowText(newName);
21 m_control_edit_sex.GetWindowText(newSex);
22 m_control_edit_grade.GetWindowText(newGrade);
23 if(newName.IsEmpty() || newSex.IsEmpty() || newGrade.IsEmpty())
24 {
25 AfxMessageBox(L"Name,Sex,Grade all cannot be empty");
26 }
27 dataToAlter.Format(L"update mytable set Name='%s', Sex='%s', Grade='%s'\
28 where Name='%s' and Sex='%s' and Grade='%s'",\
29 newName, newSex, newGrade, name, sex, grade);
30 db.ExecuteSQL(dataToAlter);
31 db.Close();
32 CString cmdStr = _T("select * from mytable order by Name Desc");
33 m_show(cmdStr);
34 }
复制代码
复制代码

  d、在mysql中delete数据函数

复制代码
View Code
复制代码
 1 void CODBCTestDlg::OnBnClickedDelete()
2 {
3 // TODO: Add your control notification handler code here
4 int nIndex;
5 CString name, sex, grade, dataToDel;
6 CDatabase db;
7 db.Open(NULL, FALSE, FALSE, _T("ODBC;DSN=mydb;UID=root;PWD=123456"));
8 nIndex = m_list.GetNextItem(-1, LVNI_ALL | LVNI_SELECTED);
9 //if(-1 == nIndex)
10 // nIndex = 0;
11 if(-1 != nIndex)
12 {
13 name = m_list.GetItemText(nIndex, 0);
14 sex = m_list.GetItemText(nIndex, 1);
15 grade = m_list.GetItemText(nIndex, 2);
16 }
17 else
18 {
19 m_control_edit_name.GetWindowText(name);
20 m_control_edit_sex.GetWindowText(sex);
21 m_control_edit_grade.GetWindowText(grade);
22 }
23
24 dataToDel.Format(L"delete from mytable where Name='%s' and Sex='%s'", name, sex);
25 db.ExecuteSQL(dataToDel);
26 db.Close();
27 CString cmdStr = _T("select * from mytable order by Name Desc");
28 m_show(cmdStr);
29
30 }
复制代码
复制代码

  e、在mysql中select数据函数(当时写find的没改)

复制代码
View Code
复制代码
 1 void CODBCTestDlg::OnBnClickedFind()
2 {
3 // TODO: Add your control notification handler code here
4 CDatabase db;
5 db.Open(NULL, FALSE, FALSE, _T("ODBC;DSN=mydb;UID=root;PWD=123456"));
6 CString Name, str;
7 m_control_edit_name.GetWindowText(Name);
8 str.Format(_T("select * from mytable where Name= '%s' Desc"), Name);
9 db.ExecuteSQL(str);
10 db.Close();
11 m_show(str);
12 }
复制代码
相关实践学习
每个IT人都想学的“Web应用上云经典架构”实战
本实验从Web应用上云这个最基本的、最普遍的需求出发,帮助IT从业者们通过“阿里云Web应用上云解决方案”,了解一个企业级Web应用上云的常见架构,了解如何构建一个高可用、可扩展的企业级应用架构。
MySQL数据库入门学习
本课程通过最流行的开源数据库MySQL带你了解数据库的世界。 &nbsp; 相关的阿里云产品:云数据库RDS MySQL 版 阿里云关系型数据库RDS(Relational Database Service)是一种稳定可靠、可弹性伸缩的在线数据库服务,提供容灾、备份、恢复、迁移等方面的全套解决方案,彻底解决数据库运维的烦恼。 了解产品详情:&nbsp;https://www.aliyun.com/product/rds/mysql&nbsp;
相关文章
|
11月前
|
SQL Java 关系型数据库
Java连接MySQL数据库环境设置指南
请注意,在实际部署时应该避免将敏感信息(如用户名和密码)硬编码在源码文件里面;应该使用配置文件或者环境变量等更为安全可靠地方式管理这些信息。此外,在处理大量数据时考虑使用PreparedStatement而不是Statement可以提高性能并防止SQL注入攻击;同时也要注意正确处理异常情况,并且确保所有打开过得资源都被正确关闭释放掉以防止内存泄漏等问题发生。
493 13
|
11月前
|
SQL 关系型数据库 MySQL
MySQL数据库连接过多(Too many connections)错误处理策略
综上所述,“Too many connections”错误处理策略涉及从具体参数配置到代码层面再到系统与架构设计全方位考量与改进。每项措施都需根据具体环境进行定制化调整,并且在执行任何变更前建议先行测试评估可能带来影响。
1871 11
|
11月前
|
SQL 监控 关系型数据库
查寻MySQL或SQL Server的连接数,并配置超时时间和最大连接量
以上步骤提供了直观、实用且易于理解且执行的指导方针来监管和优化数据库服务器配置。务必记得,在做任何重要变更前备份相关配置文件,并确保理解每个参数对系统性能可能产生影响后再做出调节。
935 11
|
11月前
|
SQL 关系型数据库 MySQL
排除通过IP访问MySQL时出现的连接错误问题
以上步骤涵盖了大多数遇到远程连接 MySQL 数据库时出现故障情形下所需采取措施,在执行每个步骤后都应该重新尝试建立链接以验证是否已经解决问题,在多数情形下按照以上顺序执行将能够有效地排除并修复大多数基本链接相关故障。
665 3
|
11月前
|
缓存 关系型数据库 BI
使用MYSQL Report分析数据库性能(下)
使用MYSQL Report分析数据库性能
630 158
|
11月前
|
关系型数据库 MySQL 数据库
自建数据库如何迁移至RDS MySQL实例
数据库迁移是一项复杂且耗时的工程,需考虑数据安全、完整性及业务中断影响。使用阿里云数据传输服务DTS,可快速、平滑完成迁移任务,将应用停机时间降至分钟级。您还可通过全量备份自建数据库并恢复至RDS MySQL实例,实现间接迁移上云。
|
11月前
|
关系型数据库 MySQL 数据库
阿里云数据库RDS费用价格:MySQL、SQL Server、PostgreSQL和MariaDB引擎收费标准
阿里云RDS数据库支持MySQL、SQL Server、PostgreSQL、MariaDB,多种引擎优惠上线!MySQL倚天版88元/年,SQL Server 2核4G仅299元/年,PostgreSQL 227元/年起。高可用、可弹性伸缩,安全稳定。详情见官网活动页。
1697 152
|
11月前
|
关系型数据库 MySQL 数据库
阿里云数据库RDS支持MySQL、SQL Server、PostgreSQL和MariaDB引擎
阿里云数据库RDS支持MySQL、SQL Server、PostgreSQL和MariaDB引擎,提供高性价比、稳定安全的云数据库服务,适用于多种行业与业务场景。
1127 156
|
11月前
|
缓存 监控 关系型数据库
使用MYSQL Report分析数据库性能(中)
使用MYSQL Report分析数据库性能
735 156
|
11月前
|
缓存 监控 关系型数据库
使用MYSQL Report分析数据库性能(上)
最终建议:当前系统是完美的读密集型负载模型,优化重点应放在减少行读取量和提高数据定位效率。通过索引优化、分区策略和内存缓存,预期可降低30%的CPU负载,同时保持100%的缓冲池命中率。建议每百万次查询后刷新统计信息以持续优化
792 161

推荐镜像

更多