系统中设置了 email 管理模块,此模块大大的方便了企业和客户联系人之间的沟通。
设置导入 Excel 功能、Web 打印功能,方便用户报表打印。
2 总体设计2.1 项目规划 客户关系管理系统是一个典型的数据库开发应用程序,由客户管理模块、库存管理模块、服务管理模块、报表管理模块、email 管理模块、用户管理模块组成,规划系统功能模块如下: 客户管理模块 该模块主要功能是对客户信息、客户联系人信息、合同信息进行添加、删除、查询等操作。
库存管理模块 该模块的主要功能是管理入库、出库信息、产品信息进行管理,其中包括对库存信息、产品信息进行添加、删除、查询等操作。
服务管理模块 该模块主要功能是对客户反馈信息进行添加、删除、查询等操作。
报表管理模块 该模块主要通过查询条件,对各种信息进行查询,并将得到的结果导出 Excul 表、进行打印报表等操作(其中信息包括:客户信息、联系人信息、反馈客户信息、库存信息) 。
–4– email 管理模块 该模块主要管理客户联系人 email 地址信息,对企业客户之间的 email 文件进行管理,向客户发送邮件。
用户管理 该模块主要管理用户信息的添加、删除等操作,并设置用户的使用权限。
2.2 系统功能结构图 客户关系管理系统 email管理 用户管理 客户管理 报表管理 服务管理 库存管理 联 e 联 客 合 客 反 库 反 反 反 系 发 m 系 户 同 户 馈 存 馈 馈 馈 用 用 产 库 人 件 a 人 信 信 报 报 报 信 信 信 户 户 品 存 信 人 i 报 息 息 表 表 表 息 息 息 管 权 管 管 息 管 l 表 管 管 模 打 打 查 添 修 理 限 理 理 管 理 管 模 理 理 块 印 印 询 加 改 理 理 块 图1 数据表树型结构图 3 系统设计3.1 设计目标 本系统是针对中小型企业通过网络实现对客户的管理而设计的,主要实现如下目标: 对客户信息(客户基本信息、联系人信息、合同信息)进行全面管理。
及时查看库存信息,并通过网站对入库、出库信息进行管理。
强大的客户信息、联系人信息报表导出、打印功能 及时了解客户的反馈信息,并对其进行管理。
实现各种信息的选择查询、模糊查询功能等。
实现了和客户通过网络在线沟通的功能,并对客户联系人的 email 地址进行管理。
管理员可以添加操作员信息、设置操作员的权限。
对用户输入的数据,系统进行严格的数据检验,尽可能排除人为的错误。
要求系统的数据保密性强,通过为每个用户设置使用权限来实现。
系统运行稳定、安全可靠。
键盘操作,快速响应。
3.2 开发及运行环境 硬件平台: CPU:P41。
8GHz; 内存:256MB 以上。
软件平台: 操作系统:Windows xp/ Windows 2000/ Windows 2003; 数据库:SQL Server 2000; 浏览器:IE5.0,推荐使用 IE6.0; –5– Web 服务器:IIS5.0; 分辨率:最佳效果 1024768。
3.3 数据库设计 本系统数据库采用 SQLServer2000 数据库,系统数据库名称为 db_System。
数据库 db_System 中包含 8 张表。
关于数据库中的数据表请参见附录 B。
4 客户管理模块设计 客户管理模块的主要功能是对客户信息进行管理,主要包括客户信息管理、联系人信息管理和合同信息管理 3 个部分。
4.1 客户信息管理设计 客户信息管理设计主要包括对客户信息进行显示/查询、添加、修改和删除 4 个部分的功能。
用户可以通过功能导航进入客户信息管理页面,页面设计效果如图 3 所示。
图3 客户信息管理页面的设计效果 在客户信息管理页面中,用户可以在查询区域输入查询条件,并选择查询方式,查找相关的客户信息;也可以单击客户信息,在展示区会显示此客户的详细信息,也可对客户信息进行修改;在选中每条信息前面的复选框,单击【删除】按钮,选中的客户信息将被删除。
1.客户信息显示/查询 用户可以在客户信息管理页面中的查询部分,输入一定的查询条件进行客户信息的查询。
当用户在查询部分输入条件后,并单击【查询】按钮,用户添加的查询条件将被提交给本页,本页将根据用户提交的表单信息对数据库进行检索,并将结果集通过操作区输出到浏览器中。
客户信息查询页面涉及的 HTML 表单元素如表 1 所示。
表1 客户信息查询页面涉及的 HTML 表单元素 名称 类型 含义 重要属性 form1 Form 表单 methodquotpostquot actionquotquot post hidden 判断表单是否提 valuequottruequot 交 tiao select 查询类型 ltoption valuequot 模 糊 查 询 quot ltif requestquottiaoquotquot 模 糊 查 询 quot thengtselectedltend ifgtgt 模 糊 查 询 lt/optiongt –6– ltoption valuequot 精 确 查 询 quot ltif requestquottiaoquotquot 精 确 查 询 quot thengtselectedltend ifgtgt 精 确 查 询 lt/optiongt sel select 关键字类别 ltoption valuequotClientNamequot ltif requestquotselquotquotClientNamequot thengtselectedltend ifgtgt 客 户 名 称 lt/optiongt …… ltoption valuequotClientHabitudequot ltif requestquotselquotquotClientHabitudequot thengtselectedltend ifgtgt 企 业 性 质 lt/optiongt search text 关键字 ltinput namequotsearchquot typequottextquot idquotsearchquot valuequotltrequestquotsearchquotgtquotgt Submit submit 查询按钮 classquotinputquot valuequot 查 询 quot 在表单提交之后,在本页将数据进行处理。
程序代码如下: lt if requestquotpostquotltgtquotquot then if requestquottiaoquotquot模糊查询quot then ‘条件输入为模糊查询时获得相应的记录集 set rsserver.CreateObjectquotadodb.recordsetquot sqlquotselect from tb_Client where quotamprequestquotselquotampquot like quotamprequestquotsearchquotampquot order byid descquot rs.open sqlconn11 else ‘条件输入为精确查询时获得相应的记录集 set rsserver.CreateObjectquotadodb.recordsetquot sqlquotselect from tb_Client where quotamprequestquotselquotampquotquotamprequestquotsearchquotampquot order by id descquot rs.open sqlconn11 end if else ‘默认状态下获得相应的记录集 set rsserver.CreateObjectquotadodb.recordsetquot sqlquotselect from tb_Client order by id descquot rs.open sqlconn11 end if 实现分页 if not rs.eof then tolrs.recordcount 总记录数 rs.pagesize15 获取每页显示的记录数 maxpagers.pagecount requestpageclngrequestquotpquot 获取当前页 if requestpagequotquot or requestpage0 then 当接收页码的值为空或者0时使其等于1 –7– requestpage1 end if if requestpagegtmaxpage then 在接收页码的值大于最大页码时,使其等于最大页码 requestpagemaxpage end if if requestpageltgt1 then 向上或向下移动相应的记录 rs.move requestpage-1rs.pagesize end if for i1 to rs.pagesize and not rs.eof 利用循环输出数据 if i mod 21 then bgquotFFFFFFquot else bgquotefefefquot end if gt lttr alignquotcenterquot bgcolorltbggt stylequotcursor: handquotonClickquotwindow.parent.framesbo.window.location KeHu_ed.aspidltrsquotidquotgtquotonMouseOverquotHLItemthisquot onMouseOutquotRethisquotgt lttd heightquot22quotgtltrsquotClientNamequotgtlt/tdgt lttdgtltrsquotClientCountryquotgtlt/tdgt lttdgtltrsquotClientCityquotgtlt/tdgt lttdgtltrsquotClientTelquotgtlt/tdgt lttdgtltrsquotClientEmailquotgtlt/tdgt lt/trgt lt rs.movenext if rs.e.
上一篇:
人事管理系统
下一篇:
关于武汉地名的语言文化考察