客户联系课程的设计.docVIP

淮 海 工 学 院 课程设计报告书 题 目： 客户关系管理系统 学 院： 郁 州 书 院 专 业： 工 商 管 理 班 级： 工 商 0 7 2 姓 名： 孙杰 周志平 戴周龙 陆庭 学 号： 510706228 510706245 510706204 510706221 2010 年 6 月 25 日 1 客户关系管理信息系统的背景 以客户为中心的理念在国外兴起于20世纪50年代，当时很多企业寄望于通过改进技术、压缩生产周期、改善内部资源管理来提高生产增长率和利润，但事实上见效甚微。这样企业开始从强调降低经营成本的供应方发展策略转向了需求方策略。所谓需求方策略，就是指与客户联系更紧密，从客户关系方面挖掘新能源的策略，客户关系管理(Customer Relationship Management，CRM)应运而生。 随着计算机新技术的发展和应用的普及，人类已从工业时代迈向信息时代，大量复杂信息的产生和传播，信息技术的高速发展，在推动社会发展和经济的同时，也增加了个人和组织处理信息工作量和信息存储量。面对这种情况，以计算机等信息技术作为信息处理的重要工具，开发和应用信息系统是个人和组织的迫切需要，也是迎接信息挑战的唯一出路，信息管理系统是一门综合管理科学，信息科学，系统科学，计算机科学和通讯技术的新兴学科，用计算机管理日常事务即自动化管理已取代了传统的管理方式。 4 客户关系管理系统的数据流程图及业务流程图 4.1 客户关系管理系统的数据流程图 错 对 4.2 客户关系管理系统业务流程图 客户管理是客户关系管理系统的主要流程之一，其过程是在系统中添加，删除，更改客户信息，确认流失客户等。 5 系统设计 5.1 代码设计 代码是代表事物名称、属性、状态等符号。为了便于计算机处理，一般用数字、字母或它们的组合来表示。 代码设计为事物提供一个概要而不含糊的认定，便于数据的存储和检索。使用代码可以提供处理的效率和精度。代码提高了数据的全局一致性。是人和计算机的共同语言，是两者交换信息的工具。 （1）添加客户信息。 调用客户信息管理窗体frmClient，接收用户输入信息，调用CClient.AddNew方法，显示操作结果。实现代码如下： 添加客户 Private Sub AddClient() Dim objClient As c Client 显示添加客户对话框并获取数据 If frmClient.RetriveClient(objClient, vtadd, GetID(tvTreeView.SelectedItem.Key)) _ = False Then Exit Sub 更新数据库 If objClient.AddNew = True Then AddClientToLvw objClient, lvListView, False Else MsgBox 错误 End If End Sub （2）修改客户信息。 获取选中的客户信息，调用添加客户信息对话框frmClient显示数据，接收用户输入，调用CClient.Update方法，显示操作结果。实现代码如下： 修改客户信息 Private Sub ModifyClient() Dim objClient As c Client Dim objWarn As New C Warning 从客户列表中获取选中客户信息 If GetClientFromControl(lvListView, objClient) = False Then Exit Sub 显示修改客户信息对话框 If frmClient.RetriveClient(objClient, vtModify) = False Then Exit