毕业设计(论文)-基于c的私营企业信息管理系统

1、山 东 工 商 学 院SHANDONG INSTITUTE OF BUSINESS AND TECHNOLOGY毕业论文(设计)GRADUATIONTHESIS（DESIGN）论文（设计）题目Title Of Thesis（Design） 分院（系别）Department 专业Speciality 班级Class 论文（设计）作者Author of Thesis(Design) 论文完成日期Date 论文（设计）指导教师Advisor 指导教师职称The Title of Advisor 私营企业信息管理系统Private Enterprise Information Management S

2、ystem 山东工商学院 指导教师对毕业论文（设计）的评语Advisors Comments on Graduation Thesis (Design)评语： 指导教师（签章）Signature of Advisor 日期 Date 评阅人意见评阅人姓名：职称：选项标准： A很同意 B同意 C基本同意 D不同意分项评价评价项目ABCD选题质量1选题符合专业培养目标，体现综合训练基本要求2题目难易适度3题目工作量适当4有理论意义或实际价值能力水平5查阅文献资料能力强6综合运用知识能力强7研究方案的设计能力强8研究方法和手段的运用能力强9外文应用能力强成果质量10文题相符11写作水平高12写作规范

3、13篇幅适度14成果有理论或实际价值总体评价： 优 良 中 及格 不及格 评阅人评语 评阅人签字： 年 月 日答辩（评审）委员会意见Appraisal of Defence Commission答辩（评审）成绩Mark of Defence鉴定意见Appraisal & Comments 主任（签章） Signature of Dean 日期Date诚 信 声 明诚信是中华民族的传统美德，诚信是做人立世的道德根本。作为一名当代大学生，我即将踏向社会去创立我未来的事业。古人云：“民无信不立”。在竞争激烈的社会中，我将恪守诚信的生存理念。毕业论文是对我大学四年学习的总结和检阅，在毕业论文的

4、选题、写作和定稿过程中，我认真对待每一个环节，在导师的悉心指导下，由我独立完成，没有抄袭他人之作或由他人代写等不诚信的行为。其中参阅了大量书籍、报刊和网上资料，但这些资料都经过本人认真整理，在理解的基础上参考使用，并在文中说明，在文后一一列出，我对他们的辛苦劳动表示尊重和感谢。 母校希望自己的每一个学生都是诚实守信的，我作为一个毕业生，对母校也将是真诚无伪的。如果发现我的毕业论文有抄袭、代笔等不诚信行为，我将接受学校对我的处罚，推迟毕业，重新写作。 我声明：我是诚实的，我将无愧于我的毕业文凭，无愧于母校多年的培养！ 声明人： 2012年4月19日 私营企业信息管理系统摘 要 私营企业信息管理系

5、统是一个私营企事业单位不可缺少的部分，他的内容对于经营者和管理者来说都至关重要。本文介绍了私营企业信息管理系统的开发整个过程，阐述了系统背景分析、系统详细设计、数据库部分设计和系统功能展示的全过程。在开发方法上本系统利用了软件工程化的思想和方法，具体模块实施采用了原型法和面向对象系统开发方法。并采用VC+6.0作为开发工具，Access 2003作为后台数据库。本系统具有供应商信息管理，顾客信息管理，商品信息管理，进货信息管理，销售信息管理等模块，课分别完成日常供应商档案，顾客档案，商品信息的添加，修改，删除，查询等功能。本人在此次毕业设计中主要对“供应商信息管理”，“顾客信息管理”，“商品信

6、息管理”，“进货信息管理”，“销售信息管理”五个模块进行了具体设计。关键词 私营企业信息系统管理、原型法、面向对象。The private enterprise information management systemAbstract Private Enterprise Information Management System is a private enterprise or business the unit essential part.It's content to operators and managers all very important. This pape

7、r introduces the Private Enterprise Information Management System's entire process of development , expounds the system background analysis, system design, database design and the show of the system function's whole process . In the development of this system, by using the method of software

8、 engineering idea and method, and the concrete implementation of the prototype model the module and object-oriented method for system development. And using VC + + 6.0 as a development tool, Access 2003 as the backend database. This system has the supplier information management, customer informatio

9、n management, commodity information management, purchase information management, sales information management module, can complete daily respectively supplier file, the customer files, commodity information to add, edit, and delete, inquires the etc. Function. In the graduation design the author in

10、mainly to the "supplier information management", "customer information management", "commodity information management", "purchase information management", "sales information management" five modules do the specific design.Key words Private Enterprise

11、 Information System Management, Object Oriented.目 录引言1第一章 系统开发平台及环境简介21.1 C/C+语言21.2 Visual v+ 6.021.3 MFC21.4 Access20033第二章 系统需求分析42.1 系统性能需求42.2 系统可行性分析4第三章 系统总体设计53.1 系统开发的总体任务53.2 系统功能描述53.3 功能模块划分6第四章 数据库设计74.1 数据库需求分析74.2 数据库E-R图74.3 数据库逻辑结构设计9第五章 系统详细设计及处理技术125.1 系统主窗体的创建125.2 创建公用模块145.3 登录

12、模块创建185.4 供应商信息管理模块设计215.5 进货信息管理模块305.6 系统的界面34第六章 系统功能展示356.1 登陆模块356.2 添加用户模块366.3 修改密码366.4 添加顾客信息376.5 修改/删除顾客信息386.6 添加进货信息396.7 添加销售信息41总 结43致 谢44参考文献45引言 该项目开发的软件为私营企业信息管理系统软件，是鉴于目前私营企业数目不断剧增，各种相关信息呈暴增的前提下，私营业主对各类信息的自动化与准确化的要求日益强烈的背景下构思出来的，该软件设计完成后可用于所有的私营企业单位的各类信息的管理。 目前社会上信息管理系统发展飞快，个个企事业单

13、位都引入了信息管理软件来管理自己日益增长的各种信息，私企管理系统也有了很大的发展，商业化的各类信息管理软件业不少，但本系统完全独立开发，力求使系统功能简介明了，功能齐全且易于操作。 私企信息管理系统是一个私营企业单位不可或缺的部分。一个功能齐全简单易用的信息管理系统不但能有效的减轻私营业主和相关人员的工作负担，它的内容对于私营业主和相关管理人员来说都至关重要。所以私企信息管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来个人使用人工的方式管理文件档案、统计和查询数据，这种管理方式存在许多的缺点，如：效率低下、保密性差，人工的大量浪费；另外时间一长，将会产生大量的文件和数据，者对于

14、查找、更新和维护都带来了不少的困难。随着科学技术的不断提高，计算机科学日渐成熟，其强大的功能已为人们深刻认识，它已进入人类社会的各个领域并发挥着越来越重要的作用。 作为计算机应用的一部分，使用计算机对私企的各类信息进行管理，具有手工管理所无法比拟的优点。例如：检索迅速、查询方便、效率高、可靠性好、存储量大、保密性好、寿命长、成本低等。这些优点能够极大地提高私企的信息管理效率，也是一个单位科学化、正规化管理，与世界接轨的重要条件。第一章 系统开发平台及环境简介1.1 C/C+语言 C/C+语言并非起源于Microsoft公司，在Windows 3.0出现之前，最好的C/C+编程工具是Borlan

15、d公司的Turbo C/C+系列。随着Windows3.0，Microsoft推出了Microsoft C/C+ 7.0，首次采用了MFC（Microsoft Foundation Class Library，微软基础类库）。正是由于MFC的出现，让C+程序员的工作变得更加高效，也使得今天的Visual Studio 2010得以成为优秀的主流编程工具。 Visual C+6.0由Microsoft开发, 它不仅是一个C+ 编译器，而且是一个基于Windows操作系统的可视化集成开发环境（integrated development environment，IDE）。Visual C+6.0由

16、许多组件组成，包括编辑器、调试器以及程序向导AppWizard、类向导Class Wizard等开发工具。 这些组件通过一个名为Developer Studio的组件集成为和谐的开发环境。Microsoft的主力软件产品。Visual C+是一个功能强大的可视化软件开发工具。自1993年Microsoft公司推出Visual C+1.0后，随着其新版本的不断问世，Visual C+已成为专业程序员进行软件开发的首选工具。1.3 MFCMFC,微软基础类(Microsoft Foundation Classes)，同VCL类似，是一种应用程序框架，随微软Visual C+ 开发工具发布。目前最新

17、版本为10.0（截止2011年3月）,并且发布了中文版。该类库提供一组通用的可重用的类库供开发人员使用。大部分类均从CObject 直接或间接派生，只有少部分类例外。MFC 应用程序的总体结构通常由开发人员从MFC类派生的几个类和一个CWinApp类对象（应用程序对象）组成。MFC 提供了MFC AppWizard 自动生成框架。Windows 应用程序中，MFC 的主包含文件为"Afxwin.h"。此外MFC的部分类为MFC/ATL 通用，可以在Win32 应用程序中单独包含并使用这些类。由于它的易用性，初学者常选用MFC。1.4 Access2003 Access 是微

18、软公司推出的基于Windows的桌面关系数据库管理系统（RDBMS，即Relational Database Management System），是Office系列应用软件之一。它提供了表、查询、窗体、报表、页、宏、模块7种用来建立数据库系统的对象；提供了多种向导、生成器、模板，把数据存储、数据查询、界面设计、报表生成等操作规范化；为建立功能完善的数据库管理系统提供了方便，也使得普通用户不必编写代码，就可以完成大部分数据管理的任务。Access能够存取 Access/Jet、Microsoft SQL Server、Oracle(甲骨文软件公司)，或者任何 ODBC 兼容数据库内的资料。熟练

19、的软件设计师和资料分析师利用它来开发应用软件，而一些不熟练的程序员和非程序员的"进阶用户"则能使用它来开发简单的应用软件。它支援部分面向对象（OOP）技术。第二章 系统需求分析2.1 系统性能需求 考虑到许多小型私营业主接触的信息量巨大，对复杂系统的操作具有一定的困难，本系统对易使用性的要求比较高，操作方式尽可能简单，可在多种操作系系统中运行（如windows、linux操作系统等），具有较强的适应能力，将数据库文件存放于软件包的根目录下更是对未安装SQl sever ，database 等大型数据库软件的操作系统有更低的要求。数据库有很好的更新能力，能随时响应用户及管理员

20、对数据的修改。 2.2 系统可行性分析 系统的软硬件要求不高，目前市场上所提供的计算机软硬件资源均能够满足系统的开发需求。 一台计算机就满足本系统的运行要求。系统并不十分复杂，开发费用不高。由于传统的私企信息管理方式已经是私营业主颇于劳碌，焦躁且工作效率差，他们对信息管理方式的改变要求迫切。 基于成本低，使用人员的需求迫切，该系统的开发是必需的。第三章 系统总体设计3.1 系统开发的总体任务 系统开发的总体任务是实现各种信息的系统化、规范化和自动化。3.2 系统功能描述 系统开发的总体任务是实现各种信息的系统化、规范化和自动化。系统的主要功能是在总体任务的基础上完成的l 供应商信息的输入，包括

21、供应商编号、公司名称、联系人姓名、公司地址、所在城市、所在地区、邮政编码、 号码、 号码、公司主页和备注信息等。l 供应商信息的修改、查询，包括供应商编号、公司名称、联系人姓名、公司地址、所在城市、所在地区、邮政编码、 号码、 号码、公司主页和备注信息等。l 顾客信息的输入，包括顾客编号、公司名称、联系人姓名、公司地址、所在城市、所在地区、邮政编码、 号码、 号码、公司主页和备注信息等。l 顾客信息的查询、修改，包括顾客编号、公司名称、联系人姓名、公司地址、所在城市、所在地区、邮政编码、 号码、 号码、公司主页和备注信息等。l 商品信息的输入，包括商品编号、商品名称、商品规格、计量单位和备注信

22、息等。l 商品信息的查询、修改，包括商品编号、商品名称、商品规格、计量单位和备注信息等。l 进货信息的输入，包括进货信息编号、供应商编号、供应商编号、供应商名称、商品编号、商品名称、商品规格、计量单位、商品数量、商品单价、进货日期和备注信息等。l 进货信息的修改和查询，包括进货信息编号、供应商编号、供应商编号、供应商名称、商品编号、商品名称、商品规格、计量单位、商品数量、商品单价、进货日期和备注信息等。l 销售信息的输入，包括扩销售信息编号、顾客编号、顾客名称、商品编号、商品名称、商品规格、计量单位、商品数量、商品单价、进货日期、折扣和备注信息等。l 销售信息的修改和查询，包括销售信息编号、顾

23、客编号、顾客名称、商品编号、商品名称、商品规格、计量单位、商品数量、商品单价、进货日期、折扣和备注信息等。3.3 功能模块划分对上述功能进行集中分块得到如下商品信息查询销售信息添加销售信息修改进货信息查询销售信息查询用户添加用户密码修改进货信息修改进货信息添加商品信息修改商品信息添加顾客信息查询顾客信息修改顾客信息添加供应商信息查询供应商信息修改供应商信息添加私营企业信息管理系统用户设置供应商信息管理顾客信息管理商品信息管理进货信息管理销售信息管理第四章 数据库设计 数据库在此信息系统中占有非常重要的地位，数据库结构设计的好坏直接影响到系统的效率及实现效果。合理的数据库结构设计可以提高数据库存

24、储效率，保证数据库的完整性和一致性。设计数据库系统时，首先应该充分了解用户在各个方面的需求，包括现有的以及可能会添加的需求。4.1 数据库需求分析 系统用户的需求具体体现在各种信息的提供、保存、更新以及查询。这就要求数据库结构够充分的满足各种信息的输入和输出。针对一般的私营企业信息系统需求，通过对贸易公司管理工作过程的内容和数据流程分析，设计一下数据项和数据结构：l 供应商信息：供应商编号、公司名称、联系人姓名、公司地址、所在城市、所在地区、邮政编码、 号码、 号、公司主页、和备注信息等。l 顾客信息：顾客编号、公司名称、联系人姓名、公司地址、所在城市、所在地区、邮政编码、 号码、 号、公司主

25、页、和备注信息等。l 商品信息：商品编号、商品名称、商品规格、计量单位和备注信息等。l 进货信息：进货信息编号、供应商编号、供应商名称、商品编号、商品名称、商品规格、计量单位、商品数量、商品单价、进货日期、备注信息等。l 销售信息：销售信息编号、顾客编号、顾客名称、商品编号、商品名称、商品规格、计量单位、商品数量、商品单价、进货日期、折扣和备注信息等。4.2 数据库E-R图供应商实体E-R图：顾客实体E-R图：商品实体E-R图：进货信息实体E-R图：销售信息实体E-R图：实体之间关系E-R图：4.3 数据库逻辑结构设计 现在将上述的数据库就够转化为Access 2003数据库系统所支持的实际数

26、据模型，也就是数据库逻辑结构。 私营企业信息管理系统数据库中各个表格设计如下供应商信息表（suppliers）：商品信息表（products）：进货信息表（sstock）销售信息表（orders）用户信息表（user_Info）第五章 系统详细设计及处理技术5.1 系统主窗体的创建本系统是在VC+ MFC基础类库的基础上添写代码开发而来的，所以本节对主窗体的创建中解释一下基本开发步骤。进入VC+6.0新建MFC AppWizard（exe）选择单文档，便已经有了一个基本的框架窗口而系统开发便是在这个框架窗口的基础上进行的。框架窗口上的菜单都是在可视化的菜单效果下添加的。效果图如下用户设置供应商

27、信息管理顾客信息管理商品信息管理进货信息管理销售信息管理添加完成之后系统框架窗口的菜单便添加完毕代码由VC+后台自动生成，简单易操作。5.2 创建公用模块为了提供代码的可重复使用性以及易维护性，方便对数据库的访问、修改等，把针对数据库的公共操作集中在一起，放到一个函数中，在CACMSAPP中添加变量如下int m_iLoginCount;_RecordsetPtr m_pADOSet;CString m_sCurrentUser;private:_ConnectionPtr ADOConn; 在CACMSAPP中添加成员函数public:bool ADOExecute(_RecordsetPt

28、r &ADOSet, _variant_t &strSQL);用于处理无记录集返回的数据库操作，再添加一个外部声明extern CACMSApp theApp;#import "C:Program FilesCommon FilesSystemadomsado15.dll" no_namespace rename("EOF","EndOfFile") rename("LockTypeEnum","newLockTypeEnum") rename("DataTypeEnu

29、m","newDataTypeEnum") rename("FieldAttributeEnum","newFieldAttributeEnum") rename("EditModeEnum","newEditModeEnum") rename("RecordStatusEnum","newRecordStatusEnum") rename("ParameterDirectionEnum","newParameter

30、DirectionEnum")并且在CACMSAPP类中进行初始化记录集函数即实现方法如下：在CACMSAPP类的InitInstance函数中写代码：AfxEnableControlContainer(); /初始化记录集m_iLoginCount=0;/建立Ado连接if(FAILED(:CoInitialize(NULL)AfxMessageBox("ADO Init failed");return false;tryADOConn.CreateInstance(_uuidof(Connection); ADOConn->Open("Prov

31、ider=Microsoft.Jet.OLEDB.4.0;Data Source=ACMS.mdb",_T(""), _T(""), adModeUnknown);/数据库连接函数用于打开Access2003数据库/ Catch Exceptionscatch(_com_error &e)CString err;err.Format("%s", (char*)(e.Description() );AfxMessageBox(err);catch(.)AfxMessageBox("Unknown Error.

32、");/ Init ADO RecordSetm_pADOSet.CreateInstance(_uuidof(Recordset);在bool ADOExecute(_RecordsetPtr &ADOSet, _variant_t &strSQL)中写代码bool CACMSApp:ADOExecute(_RecordsetPtr &ADOSet, _variant_t &strSQL) if ( ADOSet->State = adStateOpen)ADOSet->Close();try ADOSet->Open(strSQL

33、, ADOConn.GetInterfacePtr(), adOpenStatic, adLockOptimistic, adCmdUnknown); return true;catch(_com_error &e) CString err; err.Format("ADO Error: %s",(char*)e.Description(); AfxMessageBox(err); return false;用于处理无记录集返回的数据库操作。 最后添加关闭数据库连接，并释放指针的函数ExitInstance()函数int CACMSApp:ExitInstance(

34、) / TODO: Add your specialized code here and/or call the base class/ Release ADO Connectionif( adStateOpen = ADOConn->State )ADOConn->Close();/关闭连接ADOConn.Release();/释放智能指针 / Release ADO RecordSetif(adStateOpen=m_pADOSet->State)m_pADOSet->Close();/关闭记录集m_pADOSet.Release();return CWinApp:

35、ExitInstance();这样就完成了对数据库的基本操作，为下面的工作提供了最基本的功能。 公共视图上的右键功能 用户单击右键出现的右键菜单实现方法在CACMSView类中OnContextMenu函数中实现。void CACMSView:OnContextMenu(CWnd* pWnd, CPoint point) / TODO: Add your message handler code hereif ( ""=m_sCurrentList ) return;CMenu menu;if ( _T("供应商信息列表")=m_sCurrentList

36、 ) menu.LoadMenu(IDR_MENU_PROVIDER);else if ( _T("顾客信息列表")=m_sCurrentList ) menu.LoadMenu(IDR_MENU_CUSTOMER);else if ( _T("商品信息列表")=m_sCurrentList ) menu.LoadMenu(IDR_MENU_PRODUCT);else if ( _T("进货信息列表")=m_sCurrentList ) menu.LoadMenu(IDR_MENU_STOCK); else if ( _T("

37、;销售信息列表")=m_sCurrentList ) menu.LoadMenu(IDR_MENU_ORDER);CMenu* pMenu=menu.GetSubMenu(0);pMenu->TrackPopupMenu(TPM_LEFTALIGN|TPM_LEFTBUTTON|TPM_RIGHTBUTTON,point.x,point.y,this);return;这样用户在供应商信息管理模块下右击鼠标得出现以下菜单在顾客信息管理模块下右击鼠标得出现以下菜单在商品信息管理模块下右击鼠标得出现以下菜单在进货信息管理模块下右击鼠标得出现以下菜单在销售信息管理模块下右击鼠标得出现以

38、下菜单5.3 登录模块创建用户登录模块在程序一开始出现，用户名和密码匹配则登入系统，否则提示更改，取消则退出系统。实现方法，在CACMSAPP类InitInstance()函数中初始化登录对话框CLoginDLG dlg;if ( IDOK!=dlg.DoModal() ) return false;对话框输入的用户名和密码与库存匹配的实现代码在CLoginDLG中进行编写void CLoginDLG:OnOK() / TODO: Add extra validation here/ Check UserName VadilatyUpdateData(true);m_sUSER.TrimRig

39、ht(" ");if ( ""=m_sUSER )AfxMessageBox(_T("请填写用户名"), MB_ICONEXCLAMATION); return;_variant_t Holder, strQuery; strQuery = "select user_ID, user_PWD from user_Info where user_ID='"+m_sUSER+"'"theApp.ADOExecute(theApp.m_pADOSet, strQuery);int iC

40、ount = theApp.m_pADOSet->GetRecordCount();if ( 0=iCount ) theApp.m_iLoginCount+;if ( theApp.m_iLoginCount>2 ) AfxMessageBox("没有这个用户n三次输入均不正确，请核对后再来", MB_ICONEXCLAMATION);CDialog:OnCancel(); return;AfxMessageBox("没有这个用户，请重新输入用户名", MB_ICONEXCLAMATION); return;CString sPWD;the

41、App.m_pADOSet->MoveFirst();Holder = theApp.m_pADOSet->GetCollect("user_PWD");sPWD = Holder.vt=VT_NULL?"":(char*)(_bstr_t)Holder;if ( 0!=sPWD pare(m_sPWD) )theApp.m_iLoginCount+;if ( theApp.m_iLoginCount>2 ) AfxMessageBox("输入密码不正确n三次输入均不正确，请核对后再来", MB_ICONEXCLAM

42、ATION);CDialog:OnCancel(); return;AfxMessageBox("输入密码不正确，请重新输入", MB_ICONEXCLAMATION); return;/ Get Login UsertheApp.m_sCurrentUser = m_sUSER;CDialog:OnOK();以实现登录功能。5.4 供应商信息管理模块设计供应商信息管理模块主要实现功能：l 添加供应商信息l 修改供应商信息l 删除供应商信息l 查询供应商信息v 添加供应商信息对话框的创建，当用户选择“供应商信息管理|添加供应商信息”菜单时出现对话框在VC+6.0 resou

43、rce view 中添加对话框ID号为IDD_PROVIDER_DLG标题名供应商信息，添加控件如图所示并对齐控件使外观好看，多个文本框用来输入信息；按钮确认添加和返回；多个标签提示。控件属性如下表控件属性IDLabel1公司名称IDC_STATICLabel2联系人姓名IDC_STATICLabel3 IDC_STATICLabel4城市名称IDC_STATICLabel5地区名称IDC_STATICLabel6邮政编码IDC_STATICLabel7联系 IDC_STATICLabel8 号IDC_STATICLabel9公司主页IDC_STATICEdit Box1IDD_PROVIDE

44、R_COMPANYEdit Box2IDD_PROVIDER_PERSONEdit Box3IDD_PROVIDER_ADDDRESSEdit Box4IDD_PROVIDER_CITYEdit Box5IDD_PROVIDER_AREAEdit Box6IDD_PROVIDER_POSRCODEEdit Box7IDD_PROVIDER_PHONEEdit Box8IDD_PROVIDER_FAXEdit Box9IDD_PROVIDER_HOMEPAGEEdit Box10IDD_PROVIDER_MEMOButton1保存IDOKButton2返回IDCONCEL关于保存按钮的实现函数在

45、CProviderDLG ONOK（）中实现_variant_t strQuery;if ( m_bAppend | m_sCompany!=m_sOldCompany )/ Judge Provider is unique strQuery = "select * from suppliers where CompanyName='"+m_sCompany+"'" theApp.ADOExecute(theApp.m_pADOSet, strQuery); int iCount = theApp.m_pADOSet->GetRec

46、ordCount(); if ( 0!=iCount ) AfxMessageBox(_T("已经存在此公司记录！"), MB_ICONEXCLAMATION); return;用以上函数判断库存信息中是否已经存在此公司记录if ( !m_bAppend ) / Not Append, delete old record firststrQuery = "delete from suppliers where CompanyName='"+m_sOldCompany+"'" theApp.ADOExecute(theA

47、pp.m_pADOSet, strQuery);strQuery = "insert into suppliers (CompanyName, ContactName, Adress, City, Region, PostalCode, Phone,Fax, HomePage, SupplierMemo) values ('"+m_sCompany+"', '"+m_sPerson+"', '"+m_sAddress+"', '"+m_sCity+"

48、', '"+m_sArea+"', '"+m_sPostCode+"', '"+m_sPhone+"', '"+m_sFax+"', '"+m_sHomePage+"', '"+m_sMemo+"')"if ( theApp.ADOExecute(theApp.m_pADOSet, strQuery) ) if (m_bAppend) AfxMessageBox(

49、_T("添加供应商信息成功！"), MB_ICONINFORMATION); / Clear all input m_sCompany=m_sPerson=m_sAddress=m_sCity=m_sArea=m_sPostCode=m_sPhone=m_sFax=m_sHomePage=m_sMemo="" UpdateData(false);else AfxMessageBox(_T("修改供应商信息成功！"), MB_ICONINFORMATION);else if (m_bAppend) AfxMessageBox(_T(&q

50、uot;添加供应商信息失败！"), MB_ICONEXCLAMATION);else AfxMessageBox(_T("修改供应商信息失败！"), MB_ICONEXCLAMATION);strQuery = "select * from suppliers"CACMSView* p = (CACMSView*)(CMainFrame*)AfxGetMainWnd()->GetActiveView();p->RefreshProvider(strQuery);if (!m_bAppend) CDialog:OnOK();v 修改供

51、应商信息当用户选择“供应商信息管理|修改供应商信息”时程序窗口中出现如下列表视图实现此功能函数具体在CACMSView类中实现函数如下void CACMSView:CreateProvider(_variant_t strQuery)/ Get Client RectCRect rect;GetClientRect(rect);rect.top += 30;/ Create创建表格控件并将其附加给CListCtrl对象m_ListCtrl.Create(WS_CHILD|WS_VISIBLE|WS_BORDER|LVS_REPORT, rect, this, 1);m_ListCtrl.Set

52、BkColor(RGB(233, 189, 239);/设置列表背景颜色m_ListCtrl.SetTextColor(RGB(0,0,0);m_ListCtrl.SetTextBkColor(RGB(233, 189, 000);/设置已有信息列表的背景色m_ListCtrl.SetExtendedStyle(LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES|LVS_EX_HEADERDRAGDROP);/置列表视图控件的当前扩展风格/ Create Headerm_ListCtrl.InsertColumn(0,_T("公司名称"), LVCF

53、MT_LEFT, 100);m_ListCtrl.InsertColumn(1,_T("联系人姓名"), LVCFMT_LEFT, 100);（. .）添加列表中每一列的名称/ Get all records_variant_t Holder; theApp.ADOExecute(theApp.m_pADOSet, strQuery); int iCount = theApp.m_pADOSet->GetRecordCount();if ( 0=iCount ) return; CString str;COleDateTime time;theApp.m_pADOSet->MoveFirst();/在记录集中依次取出数据库中的记录for(int i=0; i<iCount; i+)/ Get CompanyNameHolder = th