第一步:通过Access创建数据库test.mdb。
第二步:创建单文档工程testado,所有的选项都取默认值。
第三步:COM库的初始化
我们可以使用AfxOleInit()来初始化COM库,这项工作通常在CWinApp::InitInstance()的重载函数中完成,请看如下代码:
BOOL CADOTest1App::InitInstance()
{
AfxOleInit();
......
第四步:用#import指令引入ADO类型库
我们在stdafx.h中加入如下语句:
#import "c:\program files\common files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF")
这一语句有何作用呢?其最终作用同我们熟悉的#include类似,编译的时候系统会为我们生成msado15.tlh,ado15.tli两个C++头文件来定义ADO库。
第五步:在testadoview.h中定义一个指向Connection对象的指针:_ConnectionPtr _pConnection;
第六步:添加如下代码:
void CTestadoView::OnInitialUpdate()
{
CView::OnInitialUpdate();
HRESULT hr;
try
{
hr = m_pConnection.CreateInstance("ADODB.Connection");//创建Connection对象
if(SUCCEEDED(hr))
{
hr = m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=test.mdb","","",adModeUnknown);///连接数据库
///上面一句中连接字串中的Provider是针对ACCESS2000环境的,对于ACCESS97,需要改为:Provider=Microsoft.Jet.OLEDB.3.51; }
}
}
catch(_com_error e)///捕捉异常
{
CString errormessage;
errormessage.Format("连接数据库失败!\r\n错误信息:%s",e.ErrorMessage());
AfxMessageBox(errormessage);///显示错误信息
}
}
第七步:在析构函数中关闭Connection对象并将其释放,代码如下:
CTestadoView::~CTestadoView()
{
m_pConnection->Close();
m_pConnection.Release();
}
第八步:添加菜单项"创建数据库表",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnAddtable()
{
_variant_t RecordsAffected;
m_pConnection->Execute("CREATE TABLE new(ID INTEGER,username TEXT,old INTEGER)",&RecordsAffected,adCmdText);
}
运行程序,执行菜单当中的命令"添加表",我们可以发现数据库中已经添加了一个表new,其中的字段有我们定义的字段。
第九步:添加菜单项"删除数据库表",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnDeleteTable()
{
_variant_t RecordsAffected;
m_pConnection->Execute("DROP TABLE new",&RecordsAffected,adCmdText);
}
运行程序,执行菜单当中的命令"删除表",我们可以发现数据库中刚才添加的表new已被删除。
第十步:添加菜单项"添加一列",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnAddColumn()
{
_variant_t RecordsAffected;
m_pConnection->Execute("ALTER TABLE new ADD newcolumn1 INTEGER",&RecordsAffected,adCmdText);
}
运行程序,执行菜单当中的命令"添加一列",我们可以发现数据库中刚才添加的表new中已添加了一个新列。
第十一步:添加菜单项"删除一列",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnAddColumn()
{
_variant_t RecordsAffected;
m_pConnection->Execute("ALTER TABLE new ADD newcolumn1 INTEGER",&RecordsAffected,adCmdText);
}
运行程序,执行菜单当中的命令"删除一列",我们可以发现数据库中刚才添加的表new中的新列已被删除。
第十二步:添加菜单项"添加记录",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnAddRecord()
{
_variant_t RecordsAffected;
for(int i = 1;i < 10; i ++)
{
CString strSQL;
strSQL.Format("INSERT INTO new(ID,username,old) VALUES (%d, 'Washington',%d)",i,i*9);
m_pConnection->Execute((_bstr_t)strSQL,&RecordsAffected,adCmdText);
}
运行程序,执行菜单当中的命令"添加记录",我们可以发现数据库中刚才添加的表new中添加了九条新的记录。
第十三步:添加菜单项"old字段加1",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnOldAddone()
{
_variant_t RecordsAffected;
m_pConnection->Execute("UPDATE new SET old = old+1",&RecordsAffected,adCmdText);
}}
运行程序,执行菜单当中的命令"old记录加1",我们可以发现数据库中刚才添加的表new中的九条新的记录的old字段都自动加1。
第十四步:添加菜单项"统计记录数目",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnTotalRecords()
{
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected;
m_pRecordset =m_pConnection->Execute("SELECT COUNT(*) FROM new where ID > 0",&RecordsAffected,adCmdText);
_variant_t vIndex = (long)0;
_variant_t vCount = m_pRecordset->GetCollect(vIndex);
///取得第一个字段的值放入vCount变量
m_pRecordset->Close();///关闭记录集
CString Message;
Message.Format("共有%d条记录",vCount.lVal);
AfxMessageBox(Message);///显示当前记录条数
}
运行程序,执行菜单当中的命令"统计记录数目",我们可以得到数据库中记录的数目。
第十五步:添加菜单项"设置ID为索引",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnSetIdIndex()
{
_variant_t RecordsAffected;
m_pConnection->Execute("CREATE UNIQUE INDEX id ON new(ID)",&RecordsAffected,adCmdText);
}
运行程序,执行菜单当中的命令"设置ID为索引",我们可以发现数据库中ID被设置为索引。
第十六步:添加菜单项"数据汇总"、"old字段的总和"、"old字段的均值"、"old的最小值"、"old字段的最大值",并添加相应的消息处理函数,然后添加代码如下:
void CTestadoView::OnOldMax()
{
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected;
m_pRecordset =m_pConnection->Execute("select MAX(old) from new",&RecordsAffected,adCmdText);
_variant_t vIndex = (long)0;
_variant_t vCount = m_pRecordset->GetCollect(vIndex);
///取得第一个字段的值放入vCount变量
m_pRecordset->Close();///关闭记录集
m_pRecordset.Release();
CString Message;
Message.Format("最大值是%d",vCount.lVal);
AfxMessageBox(Message);
}
void CTestadoView::OnOldMin()
{
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected;
m_pRecordset =m_pConnection->Execute("select MIN(old) from new",&RecordsAffected,adCmdText);
_variant_t vIndex = (long)0;
_variant_t vCount = m_pRecordset->GetCollect(vIndex);
///取得第一个字段的值放入vCount变量
m_pRecordset->Close();///关闭记录集
m_pRecordset.Release();
CString Message;
Message.Format("最小值是%d",vCount.lVal);
AfxMessageBox(Message);
}
void CTestadoView::OnOldTotal()
{
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected;
m_pRecordset =m_pConnection->Execute("select SUM(old) from new",&RecordsAffected,adCmdText);
_variant_t vIndex = (long)0;
_variant_t vCount = m_pRecordset->GetCollect(vIndex);
///取得第一个字段的值放入vCount变量
m_pRecordset->Close();///关闭记录集
m_pRecordset.Release();
CString Message;
Message.Format("总和是%d",(long)vCount);
AfxMessageBox(Message);
}
void CTestadoView::OnOldAverage()
{
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected;
m_pRecordset =m_pConnection->Execute("select AVG(old) from new",&RecordsAffected,adCmdText);
_variant_t vIndex = (long)0;
_variant_t vCount = m_pRecordset->GetCollect(vIndex);
///取得第一个字段的值放入vCount变量
m_pRecordset->Close();///关闭记录集
m_pRecordset.Release();
CString Message;
Message.Format("平均值是%d",(long)vCount);
AfxMessageBox(Message);
}}
运行程序,执行菜单当中的汇总命令,我们可以得到相关的汇总信息。
延伸阅读
文章来源于领测软件测试网 https://www.ltesting.net/