MFC 数据库编程增删改查的一个例子

1.先看下效果图：

主界面：

一个最简单的1对多的表，一张Article(文章)表，一张Category(类别)表。有添加，修改，删除文章按钮。点击类别编辑按钮就会跳到第二个对话框。点击数据库配置就会跳到第三个对话框。

类别编辑的对话框，类别做了防止重复数据添加的功能。

数据库配置的对话框，记录会保存到文件中。

2.保存数据库信息到文件中。

//写一条记录
WritePrivateProfileString(
    LPCSTR lpAppName,
    LPCSTR lpKeyName,
    LPCSTR lpString,
    LPCSTR lpFileName
    );
//读一条记录
GetPrivateProfileString(
    LPCWSTR lpAppName,
    LPCWSTR lpKeyName,
    LPCWSTR lpDefault,
    LPWSTR lpReturnedString,
    DWORD nSize,
    LPCWSTR lpFileName
    );

程序中保存的样子：

3.连接Sqlserver 2000

记得之前写.NET的程序时，非常简单就一条连接字符串。在MFC用ADO还有点麻烦。

首先要在StdAfx.h文件里添加：

#import "C:\program files\common files\system\ado\msado15.dll" rename_namespace("ADOBS") rename("EOF","adoEOF")
using namespace ADOBS;

然后在你MFC主App类的InitInstance方法中添加

AfxOleInit();

最后就是初始化连接数据库：

CMFCDatabaseApp theApp;
_ConnectionPtr m_pCon;  //ADO连接对象
_RecordsetPtr m_pRs;
_RecordsetPtr m_pRs1;
_CommandPtr m_pCom;

try
	{		
		CString temp;
		char filepath[MAX_PATH];
		GetModuleFileName(NULL,filepath,MAX_PATH);
		
		temp = theApp.ExtractFilePath(filepath);//获取可执行文件的路径
		
		//m_pCon.CreateInstance("ADODB.Connection");
		CString strAdoConn;
		char temp1[100];
		
		GetPrivateProfileString(ConfigTitle,ConfigServer,"127.0.0.1",temp1,100,temp+ConfigFileName);
		strserver = (TCHAR *)temp1;
		GetPrivateProfileString(ConfigTitle,ConfigDatabase,"",temp1,100,temp+ConfigFileName);
		strdbName = temp1;
		GetPrivateProfileString(ConfigTitle,ConfigUser,"sa",temp1,100,temp+ConfigFileName);
		strUser = temp1;
		GetPrivateProfileString(ConfigTitle,ConfigPWD,"123456",temp1,100,temp+ConfigFileName);
		strPassword = temp1;
		strAdoConn.Format("driver={SQL Server};SERVER=%s;UID=%s;PWD=%s;DATABASE=%s", 
			strserver, strUser, strPassword, strdbName);
		m_pCon.CreateInstance(_uuidof(Connection));
		m_pCon->ConnectionString = (_bstr_t)strAdoConn;
		m_pCon->Open("","","",NULL);
		m_pCom.CreateInstance("ADODB.Command");
		m_pRs.CreateInstance(_uuidof(Recordset));	
		
		m_pRs1.CreateInstance(_uuidof(Recordset));
		//	ADOFLAG = TRUE;
		
	}
	catch(_com_error)
	{		
		//ADOFLAG = FALSE;
		//Flag = FALSE;
		MessageBox(0,"请检查系统配置信息", "数据库连接失败",MB_OK);		
		return;
	}
	catch(...)
	{	
		AfxMessageBox("SYS Error");
		return ;
	}

你最好还是下载整个程序看下比较清楚。这程序用的是MFC + Sqlserver2000。说起来也不好意思，2013年了还在用Sqlserver2000。没办法，一个很老的项目。

4.执行Sql语句

void CMFCDatabaseDlg::OnButtonAdd() 
{

   CString title, body, author;
   GetDlgItemText(IDC_EDIT_TITLE, title);
   GetDlgItemText(IDC_EDIT_BODY, body);
   GetDlgItemText(IDC_EDIT_AUTHOR, author);
   int categoryId = m_categories.GetItemData(m_categories.GetCurSel());


   CString sql;
   sql.Format("Insert into Article(Title, Body, Author, CategoryId) values('%s','%s','%s',%d)",title,body,author,categoryId);
   try
   {
	   m_pRs->raw_Close();
	   m_pRs->Open((_variant_t)sql,m_pCon.GetInterfacePtr(),adOpenKeyset,adLockOptimistic,adCmdText);
	   MessageBox("操作成功.","提示",MB_OK|MB_ICONINFORMATION);
	   LoadArticleInfo();
   }
   catch (...)
   {
	   AfxMessageBox("操作失败");
   }
}

多的就不写出来了，大部分就是这种裸sql语句，想了下之前写ASP.NET MVC 用的linq to sql，一下子回到了解放前。

写完这个程序的感觉就是，MFC做做简单的小应用还是不会难的，它封装了太多，微软的工具还是蛮好用的。

5.怕上传的数据库有问题，把建表语句写在这里

记得没有包含建数据库的语句，读者可以自己建一个叫做"MFCDatabase"的数据库。

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[FK_Article_Category]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
ALTER TABLE [dbo].[Article] DROP CONSTRAINT FK_Article_Category
GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[Article]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[Article]
GO

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[Category]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[Category]
GO

CREATE TABLE [dbo].[Article] (
	[ID] [int] IDENTITY (1, 1) NOT NULL ,
	[Title] [char] (30) COLLATE Chinese_PRC_CI_AS NULL ,
	[Body] [ntext] COLLATE Chinese_PRC_CI_AS NULL ,
	[Author] [char] (30) COLLATE Chinese_PRC_CI_AS NULL ,
	[CategoryId] [int] NOT NULL 
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO

CREATE TABLE [dbo].[Category] (
	[ID] [int] IDENTITY (1, 1) NOT NULL ,
	[CategoryName] [char] (30) COLLATE Chinese_PRC_CI_AS NULL 
) ON [PRIMARY]
GO

项目下载：http://www.waitingfy.com/?attachment_id=595

原文链接：http://www.waitingfy.com/?p=584