一个完善的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 here



	BOOL 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数据源 》
最后这个程序还可以有许多可以完善和增强功能的地方。例如可以做一个完善的学生成绩管理软件，增加统计功能，计算个人总成绩和平均成绩。再增加一个记录集辅助显示班级各科目的平均成绩、及格率、优秀率等。增强查寻功能（本程序只完成了据数学成绩查寻记录），可以据学号、姓名、科目查寻，也可以查寻及格、优秀的记录。增强排序功能，按各种情况排序。有兴趣的读者可以完善它。也可以变化一下用在工程项目中，我正在做的一个
通讯程序中上位机要存放下面传来各种信息，并且值班员要不时查寻一些有用的信息，这个程序变化一下用在里面效果很好。
下载本文示例代码

输入您的搜索字词 提交搜索表单