一个完善的ODBC数据库程序

一个完善的ODBC数据库程序
作者:刘永超

下载本文示例源代码

大家知道用VC开发数据库程序，一般有两种选择：ODBC或ADO。ODBC出现的较早，用的人也多。ADO是微软正大力支持和发展的技术，致力于学习VC的程序员应该现在就学习这种技术。
在这个例字中我还是采用了自己更为熟悉的ODBC。程序的实现有两个关键地方：一、ODBC两个类的运用。二、LISTCONTROL控件的使用。程序的视图用CRecordView类，具体配置可以参考源程序。程序的实现主要在视图文件中完成，实现的功能有：增加记录、删除记录、修改记录、排序记录、查寻记录，并且在控件表格中直观的显示。本程序采用的是AECESS数据库，当然也可采用ORACLE等其它数据库。整个程序的界面简洁、直观(见下图)。


下面介绍具体步骤:
首先根据数据库的内容确定表格的样式，这里如下设计：
1．在视图头文件中给List Control控件加入Contrl 变量 m_ListCtrl。在实现文件的OnInitialUpdate()函数中加入如下语句：

//设表格表题和列的宽度m_ListCtrl.SetExtendedStyle(LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES);m_ListCtrl.InsertColumn(0,_T("学号"),LVCFMT_IMAGE|LVCFMT_LEFT);m_ListCtrl.InsertColumn(1,_T("姓名"));m_ListCtrl.InsertColumn(2,_T("数学"));m_ListCtrl.InsertColumn(3,_T("英语"));int j; for(j=0;j<4;j++){  m_ListCtrl.SetColumnWidth(j ,90);}

 

这样列表题就设置好，同时设置列的宽度。还要特别注意的一点，要在List Control控件的属性页Styles中设report属性。因为程序一运行时，要求所有记录都显示出来所以接着增加了一个Show()函数，为了它的重用性，我对它进行了封装。在后面的程序中大家可以看到它的好处。Show()函数如下：

int  CLhwyView::Show(){int i=0;m_pSet->MoveFirst();   do {  CString s;        s.Format("%d",m_pSet->m_column1);        m_ListCtrl.InsertItem(i,s,0);  m_ListCtrl.SetItemText(i,1,m_pSet->m_column2);        s.Format("%d",m_pSet->m_column3);      m_ListCtrl.SetItemText(i,2,s);        s.Format("%d",m_pSet->m_column4);        m_ListCtrl.SetItemText(i,3,s);i++;        m_pSet->MoveNext();}  while(!m_pSet->IsEOF());        m_pSet->MoveFirst();return i;}

这样整个程序初始化的工作就基本完成。因为数据库中域用的是汉字，所以记录集中出现了
奇怪的m_column变量。如果用的是英文，就不会出现这种不直观的现象。这里m_column1对应数据库中的学号，m_column2对应数据库中的姓名，其它依次类推。在数据库中我把姓名字段的数据类型设为文本，其余设为数字。而List Control控件只显示文本。所以在显示以前把不是文本的变量都用Format（）函数进行了文本格式化。
2．为了实现程序的基本功能，在视图上增加了五个按钮，在视图实现文件中对按钮响应。五个函数如下：

//增加记录void CLhwyView::OnAdd() {// TODO: Add your control notification handler code here  CAddDialog dlg;if( dlg.DoModal()==IDOK)  {  if(dlg.m_Xuehao==0){ AfxMessageBox("学号不可为零！");}else{ m_pSet->AddNew();     m_pSet->m_column1=dlg.m_Xuehao;       m_pSet->m_column2=dlg.m_strName;     m_pSet->m_column3=dlg.m_Maths; m_pSet->m_column4=dlg.m_English;       m_pSet->Update();     m_pSet->Requery();     m_pSet->MoveLast();CString s;      s.Format("%d",dlg.m_Xuehao);      m_ListCtrl.InsertItem(0,s,0);m_ListCtrl.SetItemText(0,1,dlg.m_strName);s.Format("%d",dlg.m_Maths);m_ListCtrl.SetItemText(0,2,s);       s.Format("%d",dlg.m_English);       m_ListCtrl.SetItemText(0,3,s);}}           m_pSet->MoveFirst();}

//删除记录void CLhwyView::OnDelect() {// TODO: Add your control notification handler code here    CDeleteDialog dlg;if(dlg.DoModal()==IDOK){  if(dlg.m_Password!=1234)  AfxMessageBox("你没有权限删除记录！请重输入密码：");  else{    BOOL b=FALSE; m_pSet->MoveFirst(); do {  if(dlg.m_Xuehao!=m_pSet->m_column1)  m_pSet->MoveNext();  else{    m_ListCtrl.DeleteAllItems(); b=TRUE; m_pSet->Delete(); m_pSet->Requery(); this->Show(); m_pSet->MoveFirst(); break;} }while(!m_pSet->IsEOF());          if(b==FALSE)AfxMessageBox("没有此记录");  }}}

//查寻记录void CLhwyView::OnFind() {// TODO: Add your control notification handler code hereBOOL k=FALSE;CFindDialog dlg;if(dlg.DoModal()==IDOK){  m_pSet->MoveFirst();  m_ListCtrl.DeleteAllItems();  do{if(dlg.m_Maths!=m_pSet->m_column3)m_pSet->MoveNext();else{ k=TRUE;     CString s; s.Format("%d",m_pSet->m_column1); m_ListCtrl.InsertItem(0,s); m_ListCtrl.SetItemText(0,1,m_pSet->m_column2); s.Format("%d",m_pSet->m_column3);      m_ListCtrl.SetItemText(0,2,s);             s.Format("%d",m_pSet->m_column3);             m_ListCtrl.SetItemText(0,3,s);   m_pSet->MoveNext();} }  while(!m_pSet->IsEOF());        if(k==FALSE)AfxMessageBox("没有符和条件的记录");}}

//修改记录void CLhwyView::OnEdit() {// TODO: Add your control notification handler code here  CEditDialog dlg;   if(dlg.DoModal()==IDOK){  if(dlg.m_Password!=1234)  AfxMessageBox("你没有权限更改记录！请重输入密码：");  else  {      BOOL b=FALSE;   m_pSet->MoveFirst();   do{ if(dlg.m_Xuehao!=m_pSet->m_column1) m_pSet->MoveNext(); else{  m_ListCtrl.DeleteAllItems();m_pSet->Edit();b=TRUE;    m_pSet->m_column1=dlg.m_Xuehao;m_pSet->m_column2=dlg.m_strName;m_pSet->m_column3=dlg.m_Maths;m_pSet->m_column4=dlg.m_English;m_pSet->Update();m_pSet->Requery();this->Show();m_pSet->MoveFirst();break;} }while(!m_pSet->IsEOF());          if(b==FALSE)  AfxMessageBox("没有此记录");}}}

//取全部记录void CLhwyView::OnAll() {m_ListCtrl.DeleteAllItems();this->Show();}

//排序记录void CLhwyView::OnSort() {m_ListCtrl.DeleteAllItems();    m_pSet->m_strSort="[学号]";m_pSet->Requery();this->Show();}

因为在查寻记录后，有时需要看所有记录。所以增加了一个onAll（）函数用来显示所有记录。在修改记录和删除记录中设置密码（1234）必需加以确认。这样整个程序就大致完成。
3．对程序的界面进行了美化，可以参考源程序。

特别说明：
在使用程序前请先使用控制面板中的ODBC配置工具注册ODBC数据源，选择Microsoft Access Driver,数据库选择源程序目录lhwy下的student数据库。程序中对应的代码看 ClhwySet.cpp如下程序行：

CString CLhwySet::GetDefaultConnect(){                              //注册说明return _T("ODBC;DSN=not");  //在注册数据源库时，数据源名取not。当然也可换名，}                              //但程序中的not也换成同样的名CString CLhwySet::GetDefaultSQL(){return _T("[fen]");           //表名，选fen表}

假如您从方便用户的角度考虑，可以采用在程序中动态创建数据源，请参考VC知识库中的这篇文章《用Visual C++程序实现设置ODBC数据源 》
最后这个程序还可以有许多可以完善和增强功能的地方。例如可以做一个完善的学生成绩管理软件，增加统计功能，计算个人总成绩和平均成绩。再增加一个记录集辅助显示班级各科目的平均成绩、及格率、优秀率等。增强查寻功能（本程序只完成了据数学成绩查寻记录），可以据学号、姓名、科目查寻，也可以查寻及格、优秀的记录。增强排序功能，按各种情况排序。有兴趣的读者可以完善它。也可以变化一下用在工程项目中，我正在做的一个
通讯程序中上位机要存放下面传来各种信息，并且值班员要不时查寻一些有用的信息，这个程序变化一下用在里面效果很好。