ODBC动态添加数据库:Lhwy工程
CDatabase类
public:
CDatabase m_DB;
extern CLhwyApp theApp;
#include <odbcinst.h>
//由于 VC的缺省库文件中不包含 SQLConfigDataSource()函数,因此使用该函数之前需要将 odbcinst.h文件包含在工程的头文件中
BOOL CLhwyApp::InitInstance()
{
//在VC中动态加载ODBC的方法
if (!AfxSocketInit())
{
AfxMessageBox(IDP_SOCKETS_INIT_FAILED);
return FALSE;
}
CString sPath;//数据库存放路径
GetModuleFileName(NULL,sPath.GetBufferSetLength(MAX_PATH+1),MAX_PATH);
sPath.ReleaseBuffer ();
int nPos;
nPos=sPath.ReverseFind ('//');
sPath=sPath.Left (nPos);
nPos=sPath.ReverseFind('//');
sPath=sPath.Left (nPos);
CString lpszFile = sPath + "//lhwy.mdb";
char* szDesc;
int mlen;
szDesc=new char[256];
sprintf(szDesc,"DSN=%s? DESCRIPTION=TOC support source? DBQ=%s? FIL=MicrosoftAccess? DEFAULTDIR=%s?? ","lhwy",lpszFile,sPath);
mlen = strlen(szDesc);
for (int i=0; i<mlen; i++)
{
if (szDesc[i] == '?')
szDesc[i] = '/0';
}
//Windows系统子目录中的动态链接库 Odbcinst.dll提供了一个可以动态地增加、修改和删除数据源的函数 SQLConfigDataSource()。
//
if (FALSE == SQLConfigDataSource(NULL,ODBC_ADD_DSN,"Microsoft Access Driver (*.mdb)/0",(LPCSTR)szDesc))
AfxMessageBox("SQLConfigDataSource Failed");
try
{
CString strConnect;
strConnect.Format("DSN=lhwy;");//指定odbc连接的字符串:数据源的名称和其他//一些选项信息
if(!m_DB.OpenEx(strConnect,CDatabase::useCursorLib))//装载ODBC光标库DLL,如果想直接从Crecordset类得到对象而不是派生得到,就不应该装载光标库/
//要使程序与数据源建立联系,需用CDateBase::OpenEx()或CDatabase::Open()函数来进行初始化。数据库对象必须在使用它构造记录集对象之前初始化。
{
AfxMessageBox("Unable to Connect to the Specified Data Source");
return FALSE ;
}
}
catch(CDBException *pE)
{
pE->ReportError();
pE->Delete();
return FALSE;
}
AfxEnableControlContainer();
//SetDialogBkColor(RGB(140,130,210),RGB(255,0,0));
SetDialogBkColor (RGB (140, 180, 220), RGB ( 255 ,0 , 0 ) );//背景色
连接数据表
CDRecordset m_Set(&theApp.m_DB);// &theApp.m_DB为CDatabase类型
CBRecordset m_bSet(&theApp.m_DB);
CTRecordset m_tSet(&theApp.m_DB);
CRecordset类
数据成员
m_nFields:记录集中的字段数目,类型为UINT.
m_strFilter:CString对象,包含一个SOL的WHERE字句,作为过滤器对那些满足一定条件的记录进行选择。
m_strSort: CString对象,包含一个SOL的ORDER BY字句,用于控制记录排序的方式。
GetODBCFieldInfo------返回记录集中字段的特定种类的信息。
记录导向操作
MoveFirst------设置记录集的当前记录为第一个记录,此前应调用IsBOF测 试。
记录更新操作
Edit-------准备对当前记录的更改,编辑,调用Update()完成编辑。
AddNew----准备增加一个新记录,调用Update()完成。
Delete------从记录中删除当前记录,在删除之后必须滚动到下一个记录。
操作应用:
打开数据表m_Set.Open(AFX_DB_USE_DEFAULT_TYPE,"[NO2STUDENT]");// [NO2STUDENT为数据表名
用ADO连接数据库
ADO库包含三个基本接口:_ConnectionPtr接口、_CommandPtr接口和_RecordsetPtr接口。
库包含三个基本接口:_ConnectionPtr接口、_CommandPtr接口和_RecordsetPtr接口。
_ConnectionPtr接口返回一个记录集或一个空指针。通常使用它来创建一个数据连接或执行一条不返回任何结果的SQL语句,如一个存储过程。 使用_ConnectionPtr接口返回一个记录集不是一个好的使用方法。通常同CDatabase一样,使用它创建一个数据连接,然后使用其它对象执 行数据输入输出操作。
_CommandPtr接口返回一个记录集。它提供了一种简单的方法来执行返回记录集的存储过程和SQL语句。在使用 _CommandPtr接口时,你可以利用全局_ConnectionPtr接口,也可以在_CommandPtr接口里直接使用连接串。如果你只执行一 次或几次数据访问操作,后者是比较好的选择。但如果你要频繁访问数据库,并要返回很多记录集,那么,你应该使用全局_ConnectionPtr接口创建 一个数据连接,然后使用_CommandPtr接口执行存储过程和SQL语句。
_RecordsetPtr是一个记录集对象。与以上两种对象 相比,它对记录集提供了更多的控制功能,如记录锁定,游标控制等。同_CommandPtr接口一样,它不一定要使用一个已经创建的数据连接,可以用一个 连接串代替连接指针赋给_RecordsetPtr的connection成员变量,让它自己创建数据连接。如果你要使用多个记录集,最好的方法是同 Command对象一样使用已经创建了数据连接的全局_ConnectionPtr接口,然后使用_RecordsetPtr执行存储过程和SQL语句。
程序中通过_variant_t和_bstr_t转换COM对象和C++类型的数据, _variant_t类封装了OLE自治VARIANT数据类型。在C++中使用_variant_t类要比直接使用VARIANT数据类型容易得多。
在stdafx.h 文件中添加:
#include 〈comdef.h〉//头文件comdef.h使我们的应用程序能够使用Visual C++中的一些特殊COM支持类,这些类使得处//理OLE自治更为容易一些,OLE自治是ADO使用的数据类型。
#import "msado15.dll" no_namespace rename("EOF","adoEOF")
//#import "c:/program files/common files/system/ado/msado15.dll" no_namespace rename("EOF","adoEOF")
#if !defined CATCH_ERROR
#define CATCH_ERROR /
{ /
CString strComError; /
strComError.Format("错误编号: %08lx/n错误信息: %s/n错误源: %s/n错误描述: %s", /
e.Error(), /
e.ErrorMessage(), /
(LPCSTR) e.Source(), /
(LPCSTR) e.Description()); /
::MessageBox(NULL,strComError,"错误",MB_ICONEXCLAMATION); /
}
#endif
连接数据库:
打开一个库连接。先创建一个实例指针,再用Open打开一个库连接,它将返回一个IUnknown的自动化接口指针。
_ConnectionPtr m_pConnection;//public
BOOL CCcApp::InitInstance()
{
AfxOleInit();//初始化COM库
AfxEnableControlContainer();//系统生成
// 在ADO操作中建议语句中要常用try...catch()来捕获错误信息,
// 因为它有时会经常出现一些意想不到的错误。
try
{
m_pConnection.CreateInstance("ADODB.Connection");///创建Connection对象
//m_pConnection.CreateInstance(__uuidof(Connection));
m_pConnection->ConnectionTimeout=3;///设置超时时间为3秒
m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=data.mdb;","","",adModeUnknown);//Data是数据类型
}
catch(_com_error e)///捕捉异常
{
CATCH_ERROR;
return false;
}
、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、
、、、、、、、、、、、、、、、、、、、、、、、
关闭一个库连接 如果连接状态有效,则用Close方法关闭它并赋于它空值。代码如下所示:
if(m_pConnection->State)
m_pConnection->Close();
m_pConnection= NULL;
_RecordsetPtr智能指针,可以用来打开库内数据表,并可以对表内的记录、字段等进行各种操作。
_RecordsetPtr m_pRecordset;
m_pRecordset.CreateInstance("ADODB.Recordset"); //查询数据库,看是否有此用户和密码 m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
/* m_pRecordset->Open("SELECT * FROM DemoTable", //
查询DemoTable表中所有字段
theApp.m_pConnection.GetInterfacePtr(), //
获取库接库的IDispatch指针
adOpenDynamic,
adLockOptimistic,
adCmdText);
} */
具体操作:
附加
#define CATCH_ERROR /
catch (_com_error e) /
{ /
CString strComError; /
strComError.Format("错误编号: %08lx/r/n/r/n错误信息: %s/r/n/r/n错误源: %s/r/n/r/n错误描述: %s", /
e.Error(), /
e.ErrorMessage(), /
(LPCSTR) e.Source(), /
(LPCSTR) e.Description()); /
SetDlgItemText(IDC_MESSAGE,strComError); /
}
#define SET_TEXT SetDlgItemText(IDC_MESSAGE,"!/r/n/r/n/r/n/r/n/t/t操作成功完成!");
读取表内数据
将表内数据全部读出并显示在列表框内,m_AccessList为列表框的成员变量名。如果没有遇到表结束标志adoEOF,则用 GetCollect(字段名)或m_pRecordset->Fields->GetItem(字段名)->Value方法,来获取 当前记录指针所指的字段值,然后再用MoveNext()方法移动到下一条记录位置。
插入记录
可以先用AddNew()方法新增一个空记录,再用PutCollect(字段名,值)输入每个字段的值,最后再Update()更新到库中数据既可。其中变量m_Name和m_Age分别为姓名及年龄编辑框的成员变量名。
_variant_t RecordsAffected;
theApp.m_strSQL="INSERT INTO Records (Name,YorN,College,date1,date2,Reason,Remark,Flag) values('"+m_strName+"','"+YorN+"','"+m_strCollege+"','"+m_date1+"','"+m_date2+"','"+m_strReason+"','"+m_strRemark+"','"+strNowTime+"')";
theApp.m_pConnection->Execute((_bstr_t)theApp.m_strSQL,&RecordsAffected,adCmdText);
移动记录指针
移动记录指针可以通过MoveFirst()方法移动到第一条记录、MoveLast()方法移动到最后一条记录、MovePrevious()方法移动 到当前记录的前一条记录、MoveNext()方法移动到当前记录的下一条记录。但我们有时经常需要随意移动记录指针到任意记录位置时,可以使用 Move(记录号)方法来实现,注意:
Move()方法是相对于当前记录来移动指针位置的,正值向后移动、负值向前移动,如:Move(3),当前记录是3时,它将从记录3开始往后再移动3条记录位置。
改记录中字段值
可以将记录指针移动到要修改记录的位置处,直接用PutCollect(字段名,值)将新值写入并Update()更新数据库既可。
theApp.m_strSQL="update Records set Name='"+m_strName+
"',YorN='"+YorN+
"',College='"+m_strCollege+
"',Reason='"+m_strReason+
"',date1='"+m_date1+
"',date2='"+m_date2+
"',Remark='"+m_strRemark+
"' where Flag='"+m_strFlag+"'";
_variant_t RecordsAffected;
theApp.m_pConnection->Execute((_bstr_t)theApp.m_strSQL,&RecordsAffected,adCmdText);
删除记录
删除记录和上面修改记录的操作类似,先将记录指针移动到要修改记录的位置,直接用Delete()方法删除它并用Update()来更新数据库既可。
登陆窗口连接数据库
BOOL LogonDlg::OnInitDialog() //初始化登陆窗口
{
CDialog::OnInitDialog();
// TODO: Add extra initialization here
try
{
m_pRecordset.CreateInstance("ADODB.Recordset");//创建对象
m_pRecordset->Open((_variant_t)"SELECT * FROM Admin",_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
if(!m_pRecordset->adoEOF)
{
theApp.g_Admin=((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("AdminName"));
SetDlgItemText(IDC_Use,theApp.g_Admin);
}
m_pRecordset->Close();
}
catch (_com_error e)
{
CATCH_ERROR;
return false;
}
return TRUE; // return TRUE unless you set the focus to a control
// EXCEPTION: OCX Property Pages should return FALSE
}
void LogonDlg::OnOK() //当点击确定按钮时,所作的操作,成功弹出主界面
{
// TODO: Add extra validation here
UpdateData();
if(m_Use.IsEmpty() || m_Pass.IsEmpty())
{
AfxMessageBox("请输入用户名和密码!");
}
else
{
CString sql="SELECT * FROM Admin where AdminName='"+theApp.g_Admin+"' and pwd='"+m_Pass+"'";
try
{ //创建Recordset对象的实例
m_pRecordset.CreateInstance("ADODB.Recordset"); //查询数据库,看是否有此用户和密码
m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
if(m_pRecordset->adoEOF) //如果没有此用户和密码
{
MessageBox("请输入正确的用户名和密码!","错误",MB_ICONASTERISK );
SetDlgItemText(IDC_Use,"");
GetDlgItem(IDC_Use)->SetFocus();
}
else
{
theApp.g_Admin=m_Use;
theApp.g_Pass=m_Pass;
CDialog::OnOK();
}
}
catch (_com_error e)
{
CATCH_ERROR;
return;
}
}
// CDialog::OnOK();
}
void LogonDlg::OnCancel() //
{
// TODO: Add extra cleanup here
//((CCcDlg*)AfxGetMainWnd()):取得主界面的指针
((CCcDlg*)AfxGetMainWnd())->EndDialog(IDOK);//当点击取消按钮时不弹出主界面
CDialog::OnCancel();
}
显示所查内容
extern CCcApp theApp;
void CCcDlg::List(CString sql) //将SQL语句查询的结果显示在列表框中
{
m_list.DeleteAllItems();
int nItem=0;
try
{
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
if(!m_pRecordset->adoEOF) //如果记录不为空
{
while(!m_pRecordset->adoEOF)
{
if(strcmp((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("YorN"),"Y")==0) //是否批准
nItem=m_list.InsertItem(0xffff,"Y",0);//0代表正确的图标 0xffff可用数字代替
else
nItem=m_list.InsertItem(0xffff,"N",1);//1代表错误的图标
m_list.SetItemText(nItem,1,(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("Name"));
m_list.SetItemText(nItem,2,(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("College"));
m_list.SetItemText(nItem,3,(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("Reason"));
m_list.SetItemText(nItem,4,(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("date1"));
m_list.SetItemText(nItem,5,(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("date2"));
m_list.SetItemText(nItem,6,(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("Remark"));
m_pRecordset->MoveNext();
}
}
m_pRecordset->Close();
}
catch (_com_error e)
{
CATCH_ERROR;
return;
}
CString strTitle;
strTitle.Format("学生请假管理系统 共有%d条记录",nItem+1);
SetWindowText(strTitle);
}
删除一条记录
void CCcDlg::OnButtonDel() //删除一条记录
{
try
{
POSITION pos = m_list.GetFirstSelectedItemPosition();
if(pos) //如果选中一行,则生成动态的sql语句
{
if(MessageBox("你确定要删除此记录吗?","警告",MB_ICONQUESTION|MB_YESNO|MB_DEFBUTTON2)==IDYES)
{
int nItem = m_list.GetNextSelectedItem(pos);
theApp.m_strSQL="DELETE FROM Records WHERE name='"
+m_list.GetItemText(nItem,1)+"' and College='"
+m_list.GetItemText(nItem,2)+"' and Reason='"
+m_list.GetItemText(nItem,3)+"' and date1='"
+m_list.GetItemText(nItem,4)+"' and date2='"
+m_list.GetItemText(nItem,5)+"' and Remark='"
+m_list.GetItemText(nItem,6)+"'";
_variant_t RecordsAffected;
theApp.m_pConnection->Execute((_bstr_t)theApp.m_strSQL,&RecordsAffected,adCmdText); //执行此sql语句
List("SELECT * FROM Records");
}
}
else
AfxMessageBox("请选择一行数据!");
}
catch(_com_error e)
{
CATCH_ERROR;
}
}
1. 建表
void CADlg::OnCreatetTable()
{
try
{
m_pConnection->Execute("CREATE TABLE new(ID INTEGER,username TEXT,old INTEGER)",NULL,adCmdText);
SET_TEXT;
}
CATCH_ERROR;
}
2. 删除数据表
void CADlg::OnDropTable()
{
try
{
m_pConnection->Execute("DROP TABLE new",NULL,adCmdText);
SET_TEXT;
}
CATCH_ERROR;
}
void CADlg::OnAddItem()
{
try
{
m_pConnection->Execute("ALTER TABLE new ADD newcolumn1 INTEGER",NULL,adCmdText);
SET_TEXT;
}
CATCH_ERROR;
}
void CADlg::OnDelItem()
{
try
{
m_pConnection->Execute("ALTER TABLE new ADD newcolumn1 INTEGER", NULL,adCmdText);
SET_TEXT;
}
CATCH_ERROR;
}
void CADlg::OnAddRecords()
{
try
{
for(int i = 1;i < 10; i ++)
{
CString strSQL;
strSQL.Format("INSERT INTO new(ID,username,old) VALUES (%d, '程红秀',%d)",i,i*3);
m_pConnection->Execute((_bstr_t)strSQL,NULL,adCmdText);
SET_TEXT;
}
}
CATCH_ERROR;
}
void CADlg::OnOldAdd1()
{
try
{
m_pConnection->Execute("UPDATE new SET old = old+1", NULL,adCmdText);
SET_TEXT;
}
CATCH_ERROR;
}
void CADlg::OnSum()
{
try
{
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected;
m_pRecordset =m_pConnection->Execute("SELECT COUNT(*) FROM new where ID > 0",&RecordsAffected,adCmdText);
_variant_t vCount = m_pRecordset->GetCollect((_variant_t)(long)0); //取得第一个字段的值放入vCount变量
CString str;
str.Format("!/r/n/r/n/r/n/t/t/t共有%d条记录",vCount.lVal);
SetDlgItemText(IDC_MESSAGE,str);
m_pRecordset->Close();
}
CATCH_ERROR;
}
void CADlg::OnSetIdIndex()
{
try
{
m_pConnection->Execute("CREATE UNIQUE INDEX id ON new(ID)",NULL,adCmdText);
SET_TEXT;
}
CATCH_ERROR;
}
void CADlg::OnOldSum()
{
try
{
_RecordsetPtr m_pRecordset;
_variant_t RecordsAffected;
m_pRecordset =m_pConnection->Execute("select MAX(old) from new",&RecordsAffected,adCmdText);
_variant_t vCount = m_pRecordset->GetCollect((_variant_t)(long)0);
m_pRecordset->Close();
m_pRecordset.Release();
CString Message;
Message.Format("!/r/n/r/n/r/n/t/t/t最大值是%d",vCount.lVal);
SetDlgItemText(IDC_MESSAGE,Message);
}
CATCH_ERROR;
}
void CADlg::OnOldSum2()
{
try
{
_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);
m_pRecordset->Close();
m_pRecordset.Release();
CString Message;
Message.Format("!/r/n/r/n/r/n/t/t/t总和是%d",(long)vCount);
SetDlgItemText(IDC_MESSAGE,Message);
}
CATCH_ERROR;
}
void CADlg::OnOldAverage()
{
try
{
_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);
m_pRecordset->Close();
m_pRecordset.Release();
CString Message;
Message.Format("!/r/n/r/n/r/n/t/t/t平均值是%d",(long)vCount);
SetDlgItemText(IDC_MESSAGE,Message);
}
CATCH_ERROR;
}
//
DAO访问ACCESS数据库
CDaoRecordSet类
类成员:
数据成员:m_nFields(),m_strFilter(),m_strSort()
m_pSet->m_strFilter=filter;
m_pSet->Requery();
. 属性成员函数:CanUpdate()
。记录操作函数: AddNew()
动态连接数据库:
#include <afxdao.h>
private:
CString m_DataSource;
//动态连接数据库
char path[ MAX_PATH ] = { '/0' };
GetCurrentDirectory( MAX_PATH, path );
m_DataSource.Format( "%s", path );
m_DataSource += "//MagicWord.mdb";//数据库名
CString CWordDaoSet::GetDefaultDBName()
{
return _T( m_DataSource );//数据源的路径 m_DataSource不加引号
}
//实例化
m_pSet = new CWordDaoSet();
在视图文档中,采用:在PppView.cpp文件的OnInitialUpdate()函数中得到指向数据集的指针
CFormView::OnInitialUpdate();
CPppDoc* pDoc = (CPppDoc*)GetDocument(); //得到指向文档类指针
m_ShengSet=&pDoc->m_ShengSet;//得到数据库指针
/
//PUBLIC函数 打开数据表进行操作
void CMagicWordDlg::DisplayFirstRecord()
{
try
{
if ( m_pSet->IsOpen() )
m_pSet->Close();
m_pSet->Open();
PublicAssign();//操作函数
}
catch( CDaoException *exception )
{
exception->ReportError();
return;
}
}
、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、
添加功能:执行添加、删除、查找等操作。
首先。写SQL查询语句
其次。创建一个新的纪录集对象
功能操作
关闭数据表
添加新单词
// 实例化m_pSet
m_pSet = new CWordDaoSet();
void CMagicWordDlg::OnAddition() //添加函数
{
CWordInfoDlg WordInfoDlg; //添加对话框
CWordDaoSet TempSet;//数据库表
CString strSQL;//SQL查询
// 如果点击了取消按钮,则不执行添加操作。
if ( WordInfoDlg.DoModal() != IDOK )// 调用添加对话框
return;
// 查询当前单词是否已经被收录于数据库中
if ( TempSet.IsOpen() )//关闭原有的记录集
TempSet.Close();
//查询功能,看添加的内容是否已经存在
strSQL.Format( "SELECT * FROM WordList WHERE word = '%s'",
WordInfoDlg.m_word.operator LPCTSTR() );
//创建一个新的纪录集对象
TempSet.Open( AFX_DAO_USE_DEFAULT_TYPE, strSQL, 0 );
if ( !TempSet.IsEOF() )
{
MessageBox( _T( "当前单词纪录已存在,没有添加的必要!" ),
_T( "已经存在!" ), MB_OK | MB_ICONASTERISK );
return;
}
if ( TempSet.IsOpen() )
TempSet.Close();
// 执行添加操作
try
{
m_pSet->AddNew();
//添加内容
m_pSet->m_Word = WordInfoDlg.m_word;
m_pSet->m_Explain0 = WordInfoDlg.m_explain0;
m_pSet->m_Explain1 = WordInfoDlg.m_explain1;
m_pSet->m_Explain2 = WordInfoDlg.m_explain2;
m_pSet->m_Phrase0 = WordInfoDlg.m_phrase0;
m_pSet->m_Phrase1 = WordInfoDlg.m_phrase1;
m_pSet->m_Phrase2 = WordInfoDlg.m_phrase2;
m_pSet->m_Sentence0 = WordInfoDlg.m_sentence0;
m_pSet->m_Sentence1 = WordInfoDlg.m_sentence1;
//更新数据库
if ( m_pSet->CanUpdate() )
{
m_pSet->Update();
MessageBox( _T( "添加新单词完成!" ),
_T( "添加成功!" ), MB_OK | MB_ICONASTERISK );
}
}
catch( CDaoException *exception )//异常操作
{
exception->ReportError();
// 否则指针会指向出现异常的纪录
m_pSet->MoveNext();
m_pSet->MovePrev();
return;
}
}
直接通过DAO读写Access文件
CDaoDatabase db; //数据库
CDaoRecordset RecSet(&db); //记录集
void CRWAccessDlg::OnWriteAccess() //创建数据库,并向数据表中添加数据
{
//获取主程序所在路径,存在sPath中
CString sPath;
GetModuleFileName(NULL,sPath.GetBufferSetLength (MAX_PATH+1),MAX_PATH);
sPath.ReleaseBuffer ();
int nPos;
nPos=sPath.ReverseFind ('//');
sPath=sPath.Left (nPos);
//默认创建数据名:Demo.mdb,内部表名:DemoTable,表内有二个字段:姓名、年龄
CString lpszFile = sPath + "//Demo.mdb";
CFileFind fFind;//查找文件
BOOL bSuccess;
bSuccess=fFind.FindFile(lpszFile);
fFind.Close ();
//是否已有创建好的Demo.mdb文件,没有则创建它
if(!bSuccess)
{
db.Create(lpszFile);//创建数据库
CString SqlCmd = "CREATE TABLE DemoTable(Name VARCHAR(20),Age VARCHAR(3));";
db.Execute(SqlCmd);//创建数据表
//打开已创建的数据表
RecSet.Open(AFX_DAO_USE_DEFAULT_TYPE,
"SELECT * FROM DemoTable", 0);
//加入第一个记录,用SQL语句
db.Execute("INSERT INTO DemoTable (Name,Age) VALUES ('徐景周',26)");
//加入第二个记录,用DAO涵数
RecSet.AddNew();
RecSet.SetFieldValue("Name","徐志慧");
RecSet.SetFieldValue("Age","21");
RecSet.Update();
//加入第三个记录,用DAO涵数
RecSet.AddNew();
RecSet.SetFieldValue("Name","郭徽");
RecSet.SetFieldValue("Age","27");
RecSet.Update();
//关闭记录集及库
RecSet.Close();
db.Close();
AfxMessageBox("Access文件写入成功!");
}
else
AfxMessageBox("Demo.mdb数据库已经创建!");
}
void CRWAccessDlg::OnReadAccess() //直接读取数据库
{
COleVariant var; // 字段类型
var.ChangeType(VT_BSTR, NULL);
CString strName,strAge,strFile;
//清空列表框
m_AccessList.ResetContent();
//获取主程序所在路径,存在sPath中
CString sPath;
GetModuleFileName(NULL,sPath.GetBufferSetLength (MAX_PATH+1),MAX_PATH);
sPath.ReleaseBuffer ();
int nPos;
nPos=sPath.ReverseFind ('//');
sPath=sPath.Left (nPos);
strFile = sPath + "//demo.mdb";
db.Open(strFile); // 打开已创建的demo数据库及DamoTable表
RecSet.Open(AFX_DAO_USE_DEFAULT_TYPE,"SELECT * FROM DemoTable",NULL);
while(!RecSet.IsEOF()) // 有没有到表结尾
{
RecSet.GetFieldValue("Name",var);
RecSet.GetFieldValue("Age",var);
strAge = (LPCSTR)var.pbstrVal;
m_AccessList.AddString( strName + " --> "+strAge );
RecSet.MoveNext();
}
//关闭记录集及库
RecSet.Close();
db.Close();
}