欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  数据库

VC++对Access数据库的操作(查询、插入、更新、删除等)

程序员文章站 2022-05-20 09:07:55
...

Microsoft Office Access是由 微软 发布的 关系 数据库 管理系统 。 Access 数据库 常应用于小型软件系统中, 比如: 生产管理 、 销售管理 、 库存管理 等各类企业管理软件,其最大的优点是:简单易学、使用灵活。 下面我们结合实例来详细说明,在VC MFC中

Microsoft Office Access是由微软发布的关系数据库管理系统Access数据库常应用于小型软件系统中,比如:生产管理销售管理库存管理等各类企业管理软件,其最大的优点是:简单易学、使用灵活。

下面我们结合实例来详细说明,在VC++ MFC中,如何使用Access数据库文件进行数据的存储,如何实现对数据库中数据的查询插入更新删除操作

(实例可在我的CSDN资源中下载:http://download.csdn.net/detail/margin1988/8235865)

首先,怎样创建一个可供VC++ MFC程序使用的Access数据库,并在该数据库中创建数据表呢?

第一步:打开Microsoft Office Access软件,点击“空白数据库”;

VC++对Access数据库的操作(查询、插入、更新、删除等)

第二步:设置预创建空白数据库的文件名和文件类型(文件名:point32.mdb,文件类型:Microsoft Office Access 2000 数据库(*.mdb));

VC++对Access数据库的操作(查询、插入、更新、删除等)

第三步:“创建”空白数据库

VC++对Access数据库的操作(查询、插入、更新、删除等)

第四步:为该数据库“设置数据库密码”(本例中密码设置为:1234);

VC++对Access数据库的操作(查询、插入、更新、删除等)

第五步:在该数据库中创建一张表,例如:TestTab(编号,姓名,性别,年龄);

VC++对Access数据库的操作(查询、插入、更新、删除等)

第六步:表创建完成后,保存并关闭数据库,然后将该数据库文件(point32.mdb)剪切到你的VC++程序debug或release目录中,则准备工作完成。

其次,在VC++ MFC中编写对该数据库TestTab表进行数据查询插入更新删除操作的方法:

(1)导入才用ado方式访问Access数据库所需的DLL

#import "C:\Program Files\Common Files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF")//ado访问ACCESS数据库必需

(2)在程序的入口函数中,初始化OLE以支持应用程序

AfxOleInit();

(3)获取应用程序(EXE)所在路径

CString path;//应用程序所在路径
char filepath[256];
char* pPath; 
GetModuleFileName(AfxGetInstanceHandle(),filepath,256);
pPath  = strrchr(filepath,'\\');
*pPath = 0;
path = filepath;

(4)创建数据库访问连接字符串

char* PtConnectStr;//数据库连接字符串
CString connstr =  "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=";
connstr += path;
connstr += "\\point32.mdb";
connstr += ";Jet OLEDB:Database Password='1234'";
PtConnectStr = connstr.GetBuffer(0);

(5)查询TestTab表中数据方法实现
//查询表中数据,并显示在List Control控件中
void CPoint32Dlg::ReadUserInfo()
{
	//select
	m_list.DeleteAllItems();//清空列表

	_ConnectionPtr m_pConnection;
	_RecordsetPtr m_pRecordset;

	try
	{
		m_pConnection.CreateInstance(__uuidof(Connection));
		m_pConnection->Open(PtConnectStr,"","",adModeUnknown);
	}
	catch(_com_error e)
	{
		CString errormessage;
		errormessage.Format("数据库连接失败.\r错误信息:%s",e.ErrorMessage());
		//AfxMessageBox(errormessage);
		MessageBox(errormessage,"连接失败",MB_ICONEXCLAMATION);
		if(m_pConnection->State)
			m_pConnection->Close();
		return;
	}

	try
	{

		//获取数据,放在数据集中
		CString cmd;
		cmd.Format("SELECT * FROM TestTab");

		m_pRecordset.CreateInstance("ADODB.Recordset");
		m_pRecordset->Open(cmd.GetBuffer(),
			_variant_t((IDispatch*)m_pConnection,true),
			adOpenStatic,
			adLockOptimistic,
			adCmdText);

		//处理数据,并显示
		_variant_t varbuffer;
		long index = 0;//注意:必须是long类型
		int countItem = 0;
		CString str;

		while(!m_pRecordset->adoEOF)
		{
			index = 0;
			//读ID号
			varbuffer = m_pRecordset->GetCollect(_variant_t(index));			
			if(varbuffer.vt!=VT_NULL)
			{
				str.Format("%d",varbuffer.lVal);
				m_list.InsertItem(countItem,str.GetBuffer());
			}
			//读其它的信息
			while(index GetCollect(_variant_t(index));
				if(varbuffer.vt!=VT_NULL)
				{
					str = (LPCTSTR)(_bstr_t)varbuffer;
					m_list.SetItemText(countItem,index,str.GetBuffer());
				}
			}

			m_pRecordset->MoveNext();
			countItem++;
		}
	}
	catch(_com_error &e)
	{
		//AfxMessageBox(e.Description());
		MessageBox(e.Description(),"数据库操作失败.",MB_ICONEXCLAMATION);
		if(m_pRecordset->State)
			m_pRecordset->Close();
		if(m_pConnection->State)
			m_pConnection->Close();
		return;
	}

	if(m_pRecordset->State)
		m_pRecordset->Close();
	if(m_pConnection->State)
		m_pConnection->Close();
}

(6)向TestTab表中插入数据方法实现
//向表中插入数据,并更新List Control控件中显示的数据
void CPoint32Dlg::OnBnClickedButton1()
{
	//insert
	_ConnectionPtr m_pConnection;
	_variant_t RecordsAffected;
	try
	{
		m_pConnection.CreateInstance(__uuidof(Connection));
		m_pConnection->Open(PtConnectStr,"","",adModeUnknown);
	}
	catch(_com_error e)
	{
		CString errormessage;
		errormessage.Format("数据库连接失败.\r错误信息:%s",e.ErrorMessage());
		MessageBox(errormessage,"       添加失败       ",MB_ICONEXCLAMATION);
		return;
	}
	try
	{
		CString strCmd="INSERT INTO TestTab(UName,UGender,UAge) VALUES('测试者','男','30')";

		for(int i=0;iExecute(strCmd.AllocSysString(),&RecordsAffected,adCmdText);
		}
	}
	catch(_com_error &e)
	{
		//AfxMessageBox(e.Description());
		MessageBox(e.Description(),"       添加失败       ",MB_ICONEXCLAMATION);
		if(m_pConnection->State)
			m_pConnection->Close();
		return;
	}
	if(m_pConnection->State)
		m_pConnection->Close();
	//MessageBox("添加成功!","消息");

	m_update.EnableWindow(TRUE);
	m_delete.EnableWindow(TRUE);

	ReadUserInfo();
}

(7)更新TestTab表中数据方法实现
//更新表中数据,并更新List Control控件的显示
void CPoint32Dlg::OnBnClickedButton3()
{
	// update
	_ConnectionPtr m_pConnection;
	_variant_t RecordsAffected;
	try
	{
		m_pConnection.CreateInstance(__uuidof(Connection));
		m_pConnection->Open(PtConnectStr,"","",adModeUnknown);
	}
	catch(_com_error e)
	{
		CString errormessage;
		errormessage.Format("数据库连接失败.\r错误信息:%s",e.ErrorMessage());
		MessageBox(errormessage,"       修改失败       ",MB_ICONEXCLAMATION);
		return;
	}
	try
	{
		CString strCmd="UPDATE TestTab SET [UGender]='女',[UAge]='20' WHERE [UName]='测试者'";

		m_pConnection->Execute(strCmd.AllocSysString(),&RecordsAffected,adCmdText);
	}
	catch(_com_error &e)
	{
		//AfxMessageBox(e.Description());
		MessageBox(e.Description(),"       修改失败       ",MB_ICONEXCLAMATION);
		if(m_pConnection->State)
			m_pConnection->Close();
		return;
	}
	if(m_pConnection->State)
		m_pConnection->Close();
	//MessageBox("修改成功!","消息");

	ReadUserInfo();
}

(8)删除TestTab表中数据及重置表中自动编号主键(key)方法现实

//删除表中数据、重置自动编号(从1开始),并更新List Control控件显示
void CPoint32Dlg::OnBnClickedButton4()
{
	// delete
	_ConnectionPtr m_pConnection;
	_variant_t RecordsAffected;
	try
	{
		m_pConnection.CreateInstance(__uuidof(Connection));
		m_pConnection->Open(PtConnectStr,"","",adModeUnknown);
	}
	catch(_com_error e)
	{
		CString errormessage;
		errormessage.Format("连接数据库失败!\r错误信息:%s",e.ErrorMessage());
		MessageBox(errormessage,"删除失败",MB_ICONEXCLAMATION);
		return;
	}
	try
	{
		//删除表中所有数据
		CString strCmd="DELETE FROM TestTab";

		m_pConnection->Execute(strCmd.AllocSysString(),&RecordsAffected,adCmdText);

		//重置表中自动编号ID,使其从1开始增加(必须先删除表中所有数据)
		strCmd="ALTER TABLE TestTab ALTER COLUMN ID COUNTER(1,1)";

		m_pConnection->Execute(strCmd.AllocSysString(),&RecordsAffected,adCmdText);
	}
	catch(_com_error &e)
	{
		//AfxMessageBox(e.Description());
		MessageBox(e.Description(),"删除失败",MB_ICONEXCLAMATION);
		if(m_pConnection->State)
			m_pConnection->Close();
		return;
	}
	if(m_pConnection->State)
		m_pConnection->Close();
	//MessageBox("删除成功!","完成");

	m_insert.EnableWindow(TRUE);
	m_update.EnableWindow(FALSE);
	m_delete.EnableWindow(FALSE);

	ReadUserInfo();
}