计算机毕业设计论文基于JSP银行客户业务管理系统.docx
《计算机毕业设计论文基于JSP银行客户业务管理系统.docx》由会员分享，可在线阅读，更多相关《计算机毕业设计论文基于JSP银行客户业务管理系统.docx（53页珍藏版）》请在冰点文库上搜索。
计算机毕业设计论文基于JSP银行客户业务管理系统
银行客户业务管理系统
学院
专业
班级
学号
姓名
指导教师
教师职称
年
月
日
摘要
【摘要】
银行业务管理需要由传统的分块经营转向分块与垂直管理相结合的管理模式。
这往往需要银行的业务和管理系统具有很强的柔性和适应性，能够很灵活的适应银行业务和管理流程的变化。
同时作为金融行业IT解决方案的厂商应该充分考虑到银行未来发展的战略对信息化系统提出的新的要求。
在此基础上我设计的一套基于JSP的银行客户业务管理系统。
【关键词】银行客户；业务管理系统；报表管理
0引言
随着我国加入世贸组织，金融业的开放已经趋于全面。
作为各国内商业银行，一方面面对外资金融机构的同业竞争，另一方面迫于国家宏观经济调控的影响，公司业务拓展艰难，风险防控形式依然严峻。
从零售业务所占整个贷款业务的比重和非利息收入的比重来看，国内银行普遍与国际银行业的水平有很大的差距。
中国人口众多，而且随着经济的不断发展，接近或达到中产阶层的银行优质客户群体庞大，这一潜在客户群体将给未来银行的业务增长带来巨大推动作用。
零售银行是未来国内银行业的竞争焦点。
此前在H股市场成功上市的招商银行，也正是因为其在国内零售业务的优势才赢得了国际投资者的青睐的。
在国内银行金融服务和产品同质化严重的今天，谁能够很好的进行产品和服务的创新，形成差异化的战略，谁就能强到先机。
而这一切深层次的要求是银行具有良好的业务流程和管理流程，这样才能够适应业务的发展和风险的有效防控。
这就需要银行的业务系统流程比较灵活，适合于为中小客户提供服务，相应迅速，而且具有一定的风险放控能力，个人征信等系统的数据应用，也有其现实意义。
另外，金融产品的创新和业务流程再造，都需要信息化系统的支持。
未来银行的管理架构和业务流程应以客户为目标；实行业务的垂直运作，前后台相互制约的管理体系；实行集中化和集约化的营运管理体系；精简业务流程，实现信息化、自动化、标准化和智能化。
银行业务管理需要由传统的分块经营转向分块与垂直管理相结合的管理模式。
这往往需要银行的业务和管理系统具有很强的柔性和适应性，能够很灵活的适应银行业务和管理流程的变化。
同时作为金融行业IT解决方案的厂商应该充分考虑到银行未来发展的战略对信息化系统提出的新的要求。
1系统分析
1.1需求分析
通过调查研究，要求系统满足有以下功能；
❑由于操作人员的计算机知识普遍较差，要求有良好的人机界面。
❑方便的数据选择查询，支持模糊查询功能。
❑管理客户的详细信息：
包括客户的基本信息、联系人信息、和客户签写的合同信息。
❑记录产品出库、入库的详细信息。
❑为更多的了解客户的需求，设计了服务模块，用以记录客户的反馈信息，并对反馈信息进行管理。
❑和客户联系人之间通过邮件（e-mail）进行联系，对联系人邮件地址进行管理。
❑提供信息数据导出Excel报表的功能，提供报表的打印功能。
❑对用户信息进行管理，并为用户设置管理权限。
❑数据计算自动完成，尽量减少人工干预。
❑修改当前管理员密码的功能。
❑系统退出。
1.2可行性分析
❑经济性
通过计算机网络对客户信息进行管理，使企业对自身拥有的客户有了一个更为深该的了解。
不仅能全面的统计客户的购买数量，及时的了解客户的动态信息，还可以根据计算机记录的数据信息，不断的调整企业的生产发展动向。
❑技术性
系统中设置了email管理模块，此模块大大的方便了企业和客户联系人之间的沟通。
设置导入Excel功能、Web打印功能，方便用户报表打印。
2总体设计
2.1项目规划
客户业务管理系统是一个典型的数据库开发应用程序，由客户管理模块、库存管理模块、服务管理模块、报表管理模块、email管理模块、用户管理模块组成，规划系统功能模块如下：
❑客户管理模块
该模块主要功能是对客户信息、客户联系人信息、合同信息进行添加、删除、查询等操作。
❑库存管理模块
该模块的主要功能是管理入库、出库信息、产品信息进行管理，其中包括对库存信息、产品信息进行添加、删除、查询等操作。
❑服务管理模块
该模块主要功能是对客户反馈信息进行添加、删除、查询等操作。
❑报表管理模块
该模块主要通过查询条件，对各种信息进行查询，并将得到的结果导出Excul表、进行打印报表等操作（其中信息包括：
客户信息、联系人信息、反馈客户信息、库存信息）。
❑email管理模块
该模块主要管理客户联系人email地址信息，对企业客户之间的email文件进行管理，向客户发送邮件。
❑用户管理
该模块主要管理用户信息的添加、删除等操作，并设置用户的使用权限。
2.2系统功能结构图
图1数据表树型结构图
3系统设计
3.1设计目标
本系统是针对银行通过网络实现对客户的管理而设计的，主要实现如下目标：
❑对客户信息（客户基本信息、联系人信息、合同信息）进行全面管理。
❑及时查看库存信息，并通过网站对入库、出库信息进行管理。
❑强大的客户信息、联系人信息报表导出、打印功能
❑及时了解客户的反馈信息，并对其进行管理。
❑实现各种信息的选择查询、模糊查询功能等。
❑实现了和客户通过网络在线沟通的功能，并对客户联系人的email地址进行管理。
❑管理员可以添加操作员信息、设置操作员的权限。
❑对用户输入的数据，系统进行严格的数据检验，尽可能排除人为的错误。
❑要求系统的数据保密性强，通过为每个用户设置使用权限来实现。
❑系统运行稳定、安全可靠。
❑键盘操作，快速响应。
3.2开发及运行环境
硬件平台：
❑CPU：
P41。
8GHz；
❑内存：
256MB以上。
软件平台：
❑操作系统：
Windowsxp/Windows2000/Windows2003；
❑数据库：
SQLServer2000；
❑浏览器：
IE5.0，推荐使用IE6.0；
❑Web服务器：
IIS5.0；
❑分辨率：
最佳效果1024*768。
3.3数据库设计
本系统数据库采用SQLServer2000数据库，系统数据库名称为db_System。
数据库db_System中包含8张表。
关于数据库中的数据表请参见附录B。
4银行客户管理模块设计
银行客户管理模块的主要功能是对客户信息进行管理，主要包括客户信息管理、联系人信息管理和合同信息管理3个部分。
主界面如图2所示。
4.1银行客户信息管理设计
银行客户信息管理设计主要包括对客户信息进行显示/查询、添加、修改和删除4个部分的功能。
用户可以通过功能导航进入客户信息管理页面，页面设计效果如图3所示。
图3客户信息管理页面的设计效果
在客户信息管理页面中，用户可以在查询区域输入查询条件，并选择查询方式，查找相关的客户信息；也可以单击客户信息，在展示区会显示此客户的详细信息，也可对客户信息进行修改；在选中每条信息前面的复选框，单击【删除】按钮，选中的客户信息将被删除。
1．客户信息显示/查询
用户可以在客户信息管理页面中的查询部分，输入一定的查询条件进行客户信息的查询。
当用户在查询部分输入条件后，并单击【查询】按钮，用户添加的查询条件将被提交给本页，本页将根据用户提交的表单信息对数据库进行检索，并将结果集通过操作区输出到浏览器中。
客户信息查询页面涉及的HTML表单元素如表1所示。
表1客户信息查询页面涉及的HTML表单元素
名称
类型
含义
重要属性
form1
Form
表单
method="post"action=""
post
hidden
判断表单是否提交
value="true"
tiao
select
查询类型
selected<%endif%>>模糊查询
selected<%endif%>>精确查询
sel
select
关键字类别
selected<%endif%>>客户名称
……
selected<%endif%>>企业性质
search
text
关键字
">
Submit
submit
查询按钮
class="input"value=" 查 询 "
在表单提交之后，在本页将数据进行处理。
程序代码如下：
<%
ifrequest（"post"）<>""then
ifrequest（"tiao"）="模糊查询"then‘条件输入为模糊查询时获得相应的记录集
setrs=server.CreateObject（"adodb.recordset"）
sql="select*fromtb_Clientwhere"&request（"sel"）&"like'%"&request（"search"）&"%'orderbyiddesc"
rs.opensql,conn,1,1
else‘条件输入为精确查询时获得相应的记录集
setrs=server.CreateObject（"adodb.recordset"）
sql="select*fromtb_Clientwhere"&request（"sel"）&"='"&request（"search"）&"'orderbyiddesc"
rs.opensql,conn,1,1
endif
else‘默认状态下获得相应的记录集
setrs=server.CreateObject（"adodb.recordset"）
sql="select*fromtb_Clientorderbyiddesc"
rs.opensql,conn,1,1
endif
'实现分页
ifnotrs.eofthen
tol=rs.recordcount'总记录数
rs.pagesize=15'获取每页显示的记录数
maxpage=rs.pagecount
requestpage=clng（request（"p"））'获取当前页
ifrequestpage=""orrequestpage=0then'当接收页码的值为空或者0时使其等于1
requestpage=1
endif
ifrequestpage>maxpagethen'在接收页码的值大于最大页码时，使其等于最大页码
requestpage=maxpage
endif
ifrequestpage<>1then'向上或向下移动相应的记录
rs.move（requestpage-1）*rs.pagesize
endif
fori=1tors.pagesizeandnotrs.eof'利用循环输出数据
ifimod2=1then
bg="#FFFFFF"
else
bg="#efefef"
endif
%>
style="cursor:
hand"onClick="window.parent.frames（'bo'）.window.location='KeHu_ed.asp?
id=<%=rs（"id"）%>'"onMouseOver="HLItem（this）"onMouseOut="Re（this）">
<%=rs（"ClientName"）%>
<%=rs（"ClientCountry"）%> | <%=rs（"ClientCity"）%> | <%=rs（"ClientTel"）%> | <%=rs（"ClientEmail"）%> | <%
rs.movenext
ifrs.eofthenexitfor’如果记录集为空那么跳出循环
next
else
response.Write（"没有客户信息，请添加"）
endif%>
当鼠标在某条记录上悬停时，其记录所在行的背景颜色会发生改变，此功能用到的js代码如下：
functionHLItem（obj）//鼠标经过
{
obj.oldClassName=obj.className;
obj.className="List";
}
functionRe（obj）//鼠标移开
{
obj.className=obj.oldClassName
}
其调用的代码如下：
style="cursor:
hand"onClick="window.parent.frames（'bo'）.window.location='KeHu_ed.asp?
id=<%=rs（"id"）%>'"onMouseOver="HLItem（this）"onMouseOut="Re（this）">
客户信息显示/查询页面的运行结果如图4所示：
图4客户信息查询页面的运行结果
2．客户信息添加
客户信息添加的主要功能是用于用户添加客户信息。
在查询页面中单击【添加】按钮，在展示区中会显示添加页面，其设计效果如图5所示。
如图5客户信息添加页面设计效果
当单击添加页面中的【添加】按钮时，调用js编写的自定义函数（checks（）），通过函数验证填写的数据是否正确，该函数的代码如下：
functionchecks（）
{
if（form1.ClientName.value==""）
{
alert（"公司名称不能为空"）;
returnfalse;
}
……//中间过程不详细介绍，因为实现方法类似
elseif（form1.ClientCyc.value==""）
{
alert（"需求周期不能为空"）;
returnfalse;
}
}
表单提交之后，添加的数据将被提交到本页进行处理，本页数据处理的程序代码如下：
<%
ifrequest（"post"）<>""then
setrs=server.CreateObject（"adodb.recordset"）
sql="select*fromtb_Client"
rs.opensql,conn,1,3
rs.addnew
rs（"ClientName"）=request（"ClientName"）‘添加公司名称
rs（"ClientAddress"）=request（"ClientAddress"）‘公司地址
rs（"ClientTel"）=request（"ClientTel"）‘公司电话
rs（"ClientFax"）=request（"ClientFax"）‘公司传真
rs（"ClientNumber"）=request（"ClientNumber"）‘邮政编码
rs（"ClientPage"）=request（"ClientPage"）‘公司网址
rs（"ClientEmail"）=request（"ClientEmail"）‘公司email
rs（"ClientCountry"）=request（"ClientCountry"）‘所属国家/地区
rs（"ClientHabitude"）=request（"ClientHabitude"）‘公司性质
rs（"ClientSize"）=request（"ClientSize"）‘公司规模
rs（"ClientCity"）=request（"ClientCity"）‘所属城市
rs（"ClientPay"）=request（"ClientPay"）‘结款方式
rs（"ClientCredit"）=request（"ClientCredit"）‘结款信用
rs（"ClientList"）=request（"ClientList"）‘最高订单‘
rs（"ClientYear"）=request（"ClientYear"）‘年度订单
rs（"ClientCyc"）=request（"ClientCyc"）‘需求周期
rs（"SetTime"）=now（）‘创建时间
rs（"EditTime"）=now（）‘修改时间
rs（"SetName"）=session（"admin_name"）‘创建人
rs.update
rs.close
conn.close
response.Write（"alert（'客户信息添加成功'）"）‘弹出成功对话框
endif%>
3．客户信息修改
在显示客户详细信息页面，用户可以浏览、修改其客户的详细信息。
进行客户详细信息浏览和修改的页面设计效果如图6所示：
图6客户信息修改页面设计效果
在客户信息修改页面，用户可以浏览客户详细的信息，也可以修改客户的信息（当用户有修改的权限时，那么用户可以进行修改，至于用户权限的实现，将在后面的章节中进行讲解）。
当用户单击【修改】按钮后，修改的数据将被提交到本页进行处理。
数据处理的代码如下：
<%
ifrequest（"post"）<>""and（rsr（"Client"）="可写"orrsr（"chaoji"）="是"）then
setrs=server.CreateObject（"adodb.recordset"）
sql="select*fromtb_Clientwhereid="&request（"id"）
rs.opensql,conn,1,3
rs（"ClientName"）=request（"ClientName"）‘添加公司名称
rs（"ClientAddress"）=request（"ClientAddress"）‘公司地址
rs（"ClientTel"）=request（"ClientTel"）‘公司电话
rs（"ClientFax"）=request（"ClientFax"）‘公司传真
rs（"ClientNumber"）=request（"ClientNumber"）‘邮政编码
rs（"ClientPage"）=request（"ClientPage"）‘公司网址
rs（"ClientEmail"）=request（"ClientEmail"）‘公司email
rs（"ClientCountry"）=request（"ClientCountry"）‘所属国家/地区
rs（"ClientHabitude"）=request（"ClientHabitude"）‘公司性质
rs（"ClientSize"）=request（"ClientSize"）‘公司规模
rs（"ClientCity"）=request（"ClientCity"）‘所属城市
rs（"ClientPay"）=request（"ClientPay"）‘结款方式
rs（"ClientCredit"）=request（"ClientCredit"）‘结款信用
rs（"ClientList"）=request（"ClientList"）‘最高订单‘
rs（"ClientYear"）=request（"ClientYear"）‘年度订单
rs（"ClientCyc"）=request（"ClientCyc"）‘需求周期
rs（"EditTime"）=now（）‘修改时间
rs（"SetName"）=session（"admin_name"）‘创建人
rs.update
rs.close
response.Write（"alert（'客户信息修改成功'）"）‘弹出成功对话框
endif
%>
4．客户信息删除
在客户信息管理页面，用户可以点选任意一条客户信息前面的复选框，然后单击页面下方的【删除】按钮，被选择的客户信息将被删除。
客户信息删除主要是根据传递的参数（本例中的参数为客户信息的id），将数据库中对应id的客户信息和其他和客户相关的信息全部删除，程序代码如下：
<%
callclient'验证是否有删除客户信息的权限
ifrequest（"del"）<>""then
kid=Split（Request（"del"）,","）‘分解字符串成数组
fori=0toubound（kid）
sqld="deletefromtb_Clientwhereid="&clng（kid（i））'删除客户信息
conn.execute（sqld）
sqll="deletefromtb_LinkmanwhereLinkmanClient="&clng（kid（i））'删除客户的联系人信息
conn.execute（sqll）
sqlp="deletefromtb_PactwherePactClient="&clng（kid（i））'删除客户的合同信息
conn.execute（sqlp）
sqlp="deletefromtb_FeedbackwhereFeedbackClient="&clng（kid（i））'删除客户反馈信息
conn.execute（sqlp）
sqlp="deletefromtb_ProductwhereProductProvider="&clng（kid（i））'删除客户的产品信息
conn.execute（sqlp）
next
ifrequest（"p"）=""then'返回用户操作页
response.Redirect（"KeHu_KeHu.asp"）
else
response.Redirect（"KeHu_KeHu.asp?
p="&request（"p"））
endif
else
re
升级会员 