MFC通过ADO操作Access数据库
展开全部
vc 可以访问很多数据库,比如Access、SQL servel、MYSql、Orcal等数据库系统。也有很多数据库访问技术,比如ADO、ODBC、OLE DB等。每一种数据库系统都提供了一系列的API,在程序中可以通过编码的形式调用相应的API进而对数据库操作。
你学一个vc++访问ADO数据库吧,难点,但是很实用!
1、导入ADO库
#import "c:\Program Files\Common Files\System\ADO\msado15.dll" no_namespace rename("EOF", "adoEOF")
2、用导入的动态库的指针操作数据库.
打开数据库连接
_ConnectionPtr m_pConn; // 数据库连接指针
// 创建Conneciton对象
m_pConn.CreateInstance(_T("ADODB.Connection"));
用ConnectionPtr 的open方法m_pConn->Open(_bstr_t(m_sConn),
_T(""), _T(""), lOptions));
m_sConn为你连接数据库的信息,你应该按照你的要求打开数据库,他里面包含了你的Access数据库的路径、名称等待信息,,,是一个通用的字符串。
然后你用打开的那个连接进行操作数据库。比如
_RecordsetPtr pRec = m_pConn->Execute(_bstr_t(pszSql), NULL, CmdText);
pszSql 就你要操作数据库的SQL语句。在这个SQL语句里你可以创建表、更新表等。
用ADO访问的时候要求初始他COM库和释放COM对象
// 初始化COM环境(库)
::CoInitialize(NULL);
//释放COM对象
::CoUninitialize();
你学一个vc++访问ADO数据库吧,难点,但是很实用!
1、导入ADO库
#import "c:\Program Files\Common Files\System\ADO\msado15.dll" no_namespace rename("EOF", "adoEOF")
2、用导入的动态库的指针操作数据库.
打开数据库连接
_ConnectionPtr m_pConn; // 数据库连接指针
// 创建Conneciton对象
m_pConn.CreateInstance(_T("ADODB.Connection"));
用ConnectionPtr 的open方法m_pConn->Open(_bstr_t(m_sConn),
_T(""), _T(""), lOptions));
m_sConn为你连接数据库的信息,你应该按照你的要求打开数据库,他里面包含了你的Access数据库的路径、名称等待信息,,,是一个通用的字符串。
然后你用打开的那个连接进行操作数据库。比如
_RecordsetPtr pRec = m_pConn->Execute(_bstr_t(pszSql), NULL, CmdText);
pszSql 就你要操作数据库的SQL语句。在这个SQL语句里你可以创建表、更新表等。
用ADO访问的时候要求初始他COM库和释放COM对象
// 初始化COM环境(库)
::CoInitialize(NULL);
//释放COM对象
::CoUninitialize();
ZESTRON
2024-09-04 广告
2024-09-04 广告
在Dr. O.K. Wack Chemie GmbH,我们高度重视ZESTRON的表界面分析技术。该技术通过深入研究材料表面与界面的性质,为提升产品质量与可靠性提供了有力支持。ZESTRON的表界面分析不仅涵盖了相变化、化学反应、吸附与解吸...
点击进入详情页
本回答由ZESTRON提供
2010-10-15
展开全部
// DbTestDlg.cpp : 实现文件
//
#include "stdafx.h"
#include "DbTest.h"
#include "DbTestDlg.h"
#include "Resource.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#endif
// 用于应用程序“关于”菜单项的 CAboutDlg 对话框
class CAboutDlg : public CDialog
{
public:
CAboutDlg();
// 对话框数据
enum { IDD = IDD_ABOUTBOX };
protected:
virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV 支持
// 实现
protected:
DECLARE_MESSAGE_MAP()
};
CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
}
void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
}
BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()
// CDbTestDlg 对话框
CDbTestDlg::CDbTestDlg(CWnd* pParent /*=NULL*/)
: CDialog(CDbTestDlg::IDD, pParent)
,m_strId(_T(""))
, m_strName(_T(""))
{
m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}
void CDbTestDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
DDX_Text(pDX,IDC_EDIT_ID,m_strId);
DDX_Text(pDX,IDC_EDIT_NAME,m_strName);
}
BEGIN_MESSAGE_MAP(CDbTestDlg, CDialog)
ON_WM_SYSCOMMAND()
ON_WM_PAINT()
ON_WM_QUERYDRAGICON()
//}}AFX_MSG_MAP
ON_BN_CLICKED(IDOK, &CDbTestDlg::OnBnClickedOk)
ON_BN_CLICKED(IDC_BUTTON1, &CDbTestDlg::OnBnClickedButton1)
ON_BN_CLICKED(IDC_BUTTON2, &CDbTestDlg::OnBnClickedButton2)
ON_BN_CLICKED(IDC_BUTTON3, &CDbTestDlg::OnBnClickedButton3)
END_MESSAGE_MAP()
// CDbTestDlg 消息处理程序
BOOL CDbTestDlg::OnInitDialog()
{
CDialog::OnInitDialog();
// 将“关于...”菜单项添加到系统菜单中。
// IDM_ABOUTBOX 必须在系统命令范围内。
ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
ASSERT(IDM_ABOUTBOX < 0xF000);
CMenu* pSysMenu = GetSystemMenu(FALSE);
if (pSysMenu != NULL)
{
CString strAboutMenu;
strAboutMenu.LoadString(IDS_ABOUTBOX);
if (!strAboutMenu.IsEmpty())
{
pSysMenu->AppendMenu(MF_SEPARATOR);
pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
}
}
// 设置此对话框的图标。当应用程序主窗口不是对话框时,框架将自动
// 执行此操作
SetIcon(m_hIcon, TRUE); // 设置大图标
SetIcon(m_hIcon, FALSE); // 设置小图标
// TODO: 在此添加额外的初始化代码
m_pConnection.CreateInstance(_T("ADODB.Connection"));
CString sql;
sql.Format(_T("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Employee.mdb"));
m_pConnection->Open((_bstr_t)sql,_T(""),_T(""),adModeUnknown);
return TRUE; // 除非将焦点设置到控件,否则返回 TRUE
}
void CDbTestDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
if ((nID & 0xFFF0) == IDM_ABOUTBOX)
{
CAboutDlg dlgAbout;
dlgAbout.DoModal();
}
else
{
CDialog::OnSysCommand(nID, lParam);
}
}
// 如果向对话框添加最小化按钮,则需要下面的代码
// 来绘制该图标。对于使用文档/视图模型的 MFC 应用程序,
// 这将由框架自动完成。
void CDbTestDlg::OnPaint()
{
if (IsIconic())
{
CPaintDC dc(this); // 用于绘制的设备上下文
SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);
// 使图标在工作矩形中居中
int cxIcon = GetSystemMetrics(SM_CXICON);
int cyIcon = GetSystemMetrics(SM_CYICON);
CRect rect;
GetClientRect(&rect);
int x = (rect.Width() - cxIcon + 1) / 2;
int y = (rect.Height() - cyIcon + 1) / 2;
// 绘制图标
dc.DrawIcon(x, y, m_hIcon);
}
else
{
CDialog::OnPaint();
}
}
//当用户拖动最小化窗口时系统调用此函数取得光标显示。
//
HCURSOR CDbTestDlg::OnQueryDragIcon()
{
return static_cast<HCURSOR>(m_hIcon);
}
void CDbTestDlg::OnBnClickedOk()
{
// TODO: 在此添加控件通知处理程序代码
//OnOK();
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
_variant_t varId,varName;
varName = m_pRecord->GetCollect(_T("name"));
m_strName = (TCHAR *)_bstr_t(varName);
UpdateData(FALSE);
}
void CDbTestDlg::OnBnClickedButton1()//添加
{
// TODO: 在此添加控件通知处理程序代码
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
try
{
// 写入各字段值
m_pRecord->AddNew();
m_pRecord->PutCollect("id", _variant_t(m_strId));
m_pRecord->PutCollect("name", _variant_t(m_strName));
m_pRecord->Update();
AfxMessageBox(_T("添加成功!"));
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}
UpdateData(FALSE);
}
void CDbTestDlg::OnBnClickedButton2()//修改
{
// TODO: 在此添加控件通知处理程序代码
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
try
{
// 假设对第二条记录进行修改
m_pRecord->MoveFirst();
m_pRecord->Move(1); // 从0开始
m_pRecord->PutCollect("id", _variant_t(m_strId));
m_pRecord->PutCollect("name", _variant_t(m_strName));
m_pRecord->Update();
AfxMessageBox(_T("修改成功!"));
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}
UpdateData(FALSE);
}
void CDbTestDlg::OnBnClickedButton3()//删除
{
// TODO: 在此添加控件通知处理程序代码
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
try
{
// 假设删除第二条记录
m_pRecord->MoveFirst();
m_pRecord->Move(1); // 从0开始
m_pRecord->Delete(adAffectCurrent); // 参数adAffectCurrent为删除当前记录
m_pRecord->Update();
AfxMessageBox(_T("删除成功!"));
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}
UpdateData(FALSE);
}
//
#include "stdafx.h"
#include "DbTest.h"
#include "DbTestDlg.h"
#include "Resource.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#endif
// 用于应用程序“关于”菜单项的 CAboutDlg 对话框
class CAboutDlg : public CDialog
{
public:
CAboutDlg();
// 对话框数据
enum { IDD = IDD_ABOUTBOX };
protected:
virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV 支持
// 实现
protected:
DECLARE_MESSAGE_MAP()
};
CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
}
void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
}
BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
END_MESSAGE_MAP()
// CDbTestDlg 对话框
CDbTestDlg::CDbTestDlg(CWnd* pParent /*=NULL*/)
: CDialog(CDbTestDlg::IDD, pParent)
,m_strId(_T(""))
, m_strName(_T(""))
{
m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}
void CDbTestDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
DDX_Text(pDX,IDC_EDIT_ID,m_strId);
DDX_Text(pDX,IDC_EDIT_NAME,m_strName);
}
BEGIN_MESSAGE_MAP(CDbTestDlg, CDialog)
ON_WM_SYSCOMMAND()
ON_WM_PAINT()
ON_WM_QUERYDRAGICON()
//}}AFX_MSG_MAP
ON_BN_CLICKED(IDOK, &CDbTestDlg::OnBnClickedOk)
ON_BN_CLICKED(IDC_BUTTON1, &CDbTestDlg::OnBnClickedButton1)
ON_BN_CLICKED(IDC_BUTTON2, &CDbTestDlg::OnBnClickedButton2)
ON_BN_CLICKED(IDC_BUTTON3, &CDbTestDlg::OnBnClickedButton3)
END_MESSAGE_MAP()
// CDbTestDlg 消息处理程序
BOOL CDbTestDlg::OnInitDialog()
{
CDialog::OnInitDialog();
// 将“关于...”菜单项添加到系统菜单中。
// IDM_ABOUTBOX 必须在系统命令范围内。
ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
ASSERT(IDM_ABOUTBOX < 0xF000);
CMenu* pSysMenu = GetSystemMenu(FALSE);
if (pSysMenu != NULL)
{
CString strAboutMenu;
strAboutMenu.LoadString(IDS_ABOUTBOX);
if (!strAboutMenu.IsEmpty())
{
pSysMenu->AppendMenu(MF_SEPARATOR);
pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
}
}
// 设置此对话框的图标。当应用程序主窗口不是对话框时,框架将自动
// 执行此操作
SetIcon(m_hIcon, TRUE); // 设置大图标
SetIcon(m_hIcon, FALSE); // 设置小图标
// TODO: 在此添加额外的初始化代码
m_pConnection.CreateInstance(_T("ADODB.Connection"));
CString sql;
sql.Format(_T("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Employee.mdb"));
m_pConnection->Open((_bstr_t)sql,_T(""),_T(""),adModeUnknown);
return TRUE; // 除非将焦点设置到控件,否则返回 TRUE
}
void CDbTestDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
if ((nID & 0xFFF0) == IDM_ABOUTBOX)
{
CAboutDlg dlgAbout;
dlgAbout.DoModal();
}
else
{
CDialog::OnSysCommand(nID, lParam);
}
}
// 如果向对话框添加最小化按钮,则需要下面的代码
// 来绘制该图标。对于使用文档/视图模型的 MFC 应用程序,
// 这将由框架自动完成。
void CDbTestDlg::OnPaint()
{
if (IsIconic())
{
CPaintDC dc(this); // 用于绘制的设备上下文
SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);
// 使图标在工作矩形中居中
int cxIcon = GetSystemMetrics(SM_CXICON);
int cyIcon = GetSystemMetrics(SM_CYICON);
CRect rect;
GetClientRect(&rect);
int x = (rect.Width() - cxIcon + 1) / 2;
int y = (rect.Height() - cyIcon + 1) / 2;
// 绘制图标
dc.DrawIcon(x, y, m_hIcon);
}
else
{
CDialog::OnPaint();
}
}
//当用户拖动最小化窗口时系统调用此函数取得光标显示。
//
HCURSOR CDbTestDlg::OnQueryDragIcon()
{
return static_cast<HCURSOR>(m_hIcon);
}
void CDbTestDlg::OnBnClickedOk()
{
// TODO: 在此添加控件通知处理程序代码
//OnOK();
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
_variant_t varId,varName;
varName = m_pRecord->GetCollect(_T("name"));
m_strName = (TCHAR *)_bstr_t(varName);
UpdateData(FALSE);
}
void CDbTestDlg::OnBnClickedButton1()//添加
{
// TODO: 在此添加控件通知处理程序代码
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
try
{
// 写入各字段值
m_pRecord->AddNew();
m_pRecord->PutCollect("id", _variant_t(m_strId));
m_pRecord->PutCollect("name", _variant_t(m_strName));
m_pRecord->Update();
AfxMessageBox(_T("添加成功!"));
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}
UpdateData(FALSE);
}
void CDbTestDlg::OnBnClickedButton2()//修改
{
// TODO: 在此添加控件通知处理程序代码
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
try
{
// 假设对第二条记录进行修改
m_pRecord->MoveFirst();
m_pRecord->Move(1); // 从0开始
m_pRecord->PutCollect("id", _variant_t(m_strId));
m_pRecord->PutCollect("name", _variant_t(m_strName));
m_pRecord->Update();
AfxMessageBox(_T("修改成功!"));
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}
UpdateData(FALSE);
}
void CDbTestDlg::OnBnClickedButton3()//删除
{
// TODO: 在此添加控件通知处理程序代码
UpdateData();
CString sql;
m_pRecord.CreateInstance(_T("ADODB.Recordset"));
sql.Format(_T("SELECT * FROM [employee] WHERE id = '%s' ORDER BY [employee].id"),m_strId);
m_pRecord->Open(_bstr_t(sql),
_variant_t((IDispatch*)m_pConnection,true),
adOpenDynamic,adLockOptimistic,adCmdText);
try
{
// 假设删除第二条记录
m_pRecord->MoveFirst();
m_pRecord->Move(1); // 从0开始
m_pRecord->Delete(adAffectCurrent); // 参数adAffectCurrent为删除当前记录
m_pRecord->Update();
AfxMessageBox(_T("删除成功!"));
}
catch(_com_error *e)
{
AfxMessageBox(e->ErrorMessage());
}
UpdateData(FALSE);
}
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询