还剩30页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
个人财务管理系统第一章绪论当今社会越来越着朝着信息化和数字化法开展,计算机的应用领域使我们的生活越来越方便和快捷,可以说If Request,form〃add〃=〃添加〃ThenSet rs=Conn.Execute Select*From[user]Where username=〃Request.form user〃〃If Not rs.Eof orrs.Bof ThenResponse.Write z,scriptalert该用户已存在;this,location.href=,add user,asp;〈/SCRIPT〉”end ifIfrequest.form,,pwd2,/request.formz,pwd3z,thenResponse.Write,zscriptalert两次密码不相同;location=javascript:history,back T〈/SCRIPT”end ifSet rs=Server.CreateOb jectZ/ADODB.RecordSetz,Sql=Select*From[user]Where IDis null”rs.Open Sql,Conn,1,3rsusername=Request,form userrsadmin二Request.form,,admin/,md5pwd=md5request〃name2〃rspassword=md5request,form〃pwd2〃Response.Write z,scriptalert操作成功’;this,location.href=,t user,asp;〈/SCRIPT〉”end if%bodyscript language=〃JavaScript”〉!--function chktheForm{if theForm.user,value=二〃〃{alert〃请输入用户〃;theForm.user,focus;return false;if theForm.pwd
2.value==〃〃{alert〃请输入密码!〃;theForm.pwd
2.focus;return false;if theForm.pwd
3.value==〃〃{alert〃请重复密码!〃;theForm.pwd
3.focus;return false;//—/scripttable width=〃100%〃〉〈trXtd height=〃25〃〉〈/tdX/tr〉〈/table〉table width=〃100%〃border=〃0〃align=center cellpadding=〃5〃cellspacing=〃1〃bgcolor=,,#eeeeee,,form action=〃〃method=post name=forml onSubmit二〃return chkthisz,tr bgcolor=fffffftd width=〃40%〃align=right”用户:/tdtdinput name=user type=〃text“size=〃20〃maxlength=〃30〃//td/trtr bgcolor=fffffftd width=〃40%〃align=right”〉权限:/div/td tdselectname=〃admin〃〉option value=〃0〃〉普通用户〈/option〉option value=〃1〃管理员〈/option〉/select font color=red--请选择/fontX/td〉/trtr bgcolor=fffffftd width=〃40%〃align二〃right”〉密码/tdtd width=,,60%,,input name二〃pwd2〃size=〃28〃type=〃password〃maxlength=〃26〃//td/trtr bgco1or=fffffftd width=〃40%〃align二〃right〃重复密码/tdtd width=,,60%/zinput name=〃pwd3〃size=〃28〃type=〃password〃maxlength=〃26〃//td/trtr bgcolor=fffffftd width=〃40%〃align二〃right〃nbsp;/td tdinput type=submit“name二〃add value二〃添力口〃/X/td/tr/form/table/body/html用户:权限:普通用户▼〈一请选择密码:重复密码:管理用户!一ttinclude file二〃conn.asp〃一!-ttinclude file二〃heck.asp〃一htmlheadmeta http-equiv二〃Content-Type“content二〃text/html;charset=gb2312〃/LINK href=〃css.css〃type=text/css rel=stylesheet//head%set rs=server.createobject adodb.recordsetsql二〃select*from[user]where id=〃Request.Cookies〃id〃rs.open sql,conn,1,1if rs/zadminz,1thenResponse.Write,zscriptalert系统超时;this,location.href=,index,asp;〈/SCRIPT〉”end ifIf Request,form〃user〃二〃修改〃ThenSet rs=Server.CreateOb jectZ,ADODB.RecordSet,zSql=Select*From[user]Where id=〃Request〃id〃〃〃rs.Open Sql,Conn,1,3rs〃admin〃=Request,form〃admin〃Response.Write z/scriptalert操作成功’;this,location.href=,t_user.asp;〈/SCRIPT”end if%bodytable width=z,100%/ztrtd height=/,25,,/td/tr/tabletable width=〃100%〃border=〃0〃align=center cellpadding=〃5〃cellspacing=〃1〃bgcolor=,/#eeeeee,z%Set rs=Server.CreateObject,/ADODB.RecordSet,zSql=Select*From[user]Where id=〃Request〃id〃〃〃rs.Open Sql,Conn,1,1%form action」“method二post name=forml onSubmit二〃return chkthisz,tr bgcolor=ffffff td width=40%〃align=right”用户:/td td%=rs,username^%/td/trtr bgcolor=ffffff td width=“40%〃align二〃right〃权限:/tdtd管理员〈input name=admin“type二〃radio〃value=〃1〃%If rsadmin二1Then Response.Write checkedEndif%/nbsp;普通用户〈input name二〃admin“type=〃radio value=〃0〃%If rs〃admin〃=0Then Response.Writechecked〃End if%//td/trtr bgcolor=ffffff td width=〃40%〃align二〃right〃nbsp;/tdtdinput type=submit“name=〃user〃value=〃修改〃//td/tr/form%%/table/body/html会员列表编号用户名称权限操作14则正朝普通会员|统计表|明细表|修改|删除|1admin管理员页数1〃[首页][上一页][下一页][屋页]共有2条记录显示当前用户及退出模块table width=〃100%height=〃26border=0〃cellpadding二〃0〃cellspacing=〃0〃bgcolor=〃#335Ea8〃trtdtable width=〃90%〃border=〃0〃align二〃center cellpadding二〃0〃cellspacing=〃0〃〉trtdfont color二〃ffffff〃当前用户:b%=Request.Cookies,,user,,%X/b/font a href二〃quit.asp〃target=〃_top〃Xfont color=〃#ffffff〃退出/font〈/a/td/tr/table/td/tr/table管理收入类型模块!--ttinclude file二〃conn.asp〃--!-ttinclude file二〃heck.asp〃一htmlheadtitle/titlemeta http-equiv二〃Content-Type“content二〃text/html;charset=gb2312〃/LINK href二〃css.css〃type=text/css rel=stylesheet//head%idd二Request.Cookies〃id〃If Request,form〃add〃=“添加〃Thenpaytype=Trim Request.Form,zpaytype,zio=Trim Request.Form,,io/,Set rs=Conn.Execute z,Select PayType From[type]Where user=〃idd〃and PayType=〃paytype〃〃If Notrs.Eof orrs.Bof ThenResponse.Write〃script〉alert该类型已存在;this,location,href=add_type.asp;/SCRIPT〃elseSet rs=Server.CreateObject CADODB.RecordSet,zSql=Select*From[type]Where IDis null”rs.Open Sql,Conn,1,3rs PayType=paytypers〃date〃=now rs,,InOut,/二iors z,user,z=iddEnd ifResponse.Write z\scriptalert操作成功;this,location,href=type,asp;〈/SCRIPT”end if%bodyscript language=〃JavaScript”〉!一function chktheForm{if theForm.paytype,value==〃〃{alert〃请输入费用类型!〃;theForm.paytype,focus;return false;//--/scripttable width=,z100%,ztrtd height=〃25〃X/tdX/trX/table table width=〃100%〃border=〃0〃align=center cellpadding=〃5〃cellspacing=〃1〃bgcolor=,/#eeeeee,,form action=〃〃method=post name=forml onSubmit二〃return chkthis z,tr bgco1or=fffffftd width=〃40%〃align二〃right”费用类型:/tdtdinput name二〃paytype“type=text size=〃30〃maxlength=〃30〃//td/trtr bgcolor=fffffftd width=〃40%〃align二〃right〃所属类型/div/tdtdselect name=〃io〃option value=1〃〉收入〈/option〉option value=0〃〉支出〈/option〉/select font color=red--请选择/font〉/td/trtr bgcolor=fffffftd width=〃40%〃align二〃right〃nbsp;/td〉tdinput type二〃submit“name二〃add〃value=〃添力口〃/〉〈/td〉/tr/form/table/body/html所属类型:收入▼<一清选择〈一请选择费用类型费用类型:支出所属类管理类型模块!-ttinclude file二〃conn.asp〃一!--#include file=heck.asp〃一htmlheadtitle/titlemeta http-equiv二〃Content-Type“content二〃text/html;charset=gb2312〃/LINK href=〃css.css〃type=text/css rel=stylesheet//head%idd=Request.Cookies〃id〃If Request,form〃type〃二〃修改〃Then paytype=Trim Request.Form/zpaytypez/Set rs=Conn.Execute SelectPayTypeFrom[type]Where user=〃idd〃and PayType=〃paytype〃〃If Notrs.Eof orrs.Bof ThenResponse.Write,zscriptalert J该类型已存在;this.location.href=javascript:history,back-1;〈/SCRIPT〉”elseSet rs=Server.CreateObject CADODB.RecordSet,/Sql=Select*From[type]Where user=〃idd〃and id二—Request〃id〃〃〃rs.Open Sql,Conn,1,3rs PayType=paytypeEnd ifResponse.Write/zscriptalert操作成功’;this.location.href=,type,asp;〈/SCRIPT〉”end if%bodyscript language=〃JavaScript”〉!--function chktheForm{if theForm.paytype,value==〃〃{alert〃请输入费用类型!〃;theForm.paytype.focus;return false;//—/scripttable width=/z100%,ztrtd height=〃25〃X/tdX/trX/table〉table width=〃100%〃border二〃0〃align=center cellpadding=〃5〃cellspacing=1〃bgcolor=/,#eeeeee,,%Set rs二Server.CreateObject,ZADODB.RecordSetz,Sql=Select*From[type]Where id=〃Request〃id〃〃〃rs.Open Sql,Conn,1,1%form action=〃〃method=post name=forml onSubmit=,,return chkthis”〉tr bgcolor=ffffff tdwidth=〃40%〃align二〃right费用类型:/tdtdinput name二〃paytype“type二〃text“size=〃30〃maxlength=30〃value=〃觌=rs〃PayType〃%〃//td/trtr bgcolor=ffffff tdwidth=〃40%〃align二〃right〃添加日期〈/divX/td td%=rs〃date〃%/td/trtr bgcolor=ffffff tdwidth=“40%〃align二〃right〉所属类型/div/tdtd%If rsInOut=0ThenResponse.Write,font color=支出〈/font〉”ElseResponse.Write〃收入〃End if%/td/trtr bgcolor=ffffff tdwidth=〃40%〃align二〃right〃nbsp;/tdtdinput type=submit“name二〃type value=〃修改〃//td/tr/form%%/table/body/html所有费用类型费用类型所属类理添加日期操作工资收入2010/8/3115:54:49修改1删除奖金收入2010/8/3115:54:56修改1删除房租支出2010/8/3116:03:39修改1删除生活费支出2010/8/3116:04:20修改1删除宴席费支出2010/8/3116:08:45修改1删除2010/8/3116:09:15兼职收入修改1删除2010/8/3116:26:11证券投资收益收入修改1删除证券投资亏损支出2010/8/3116:26:37修改1删除银行利息收入2010/8/3116:26:59修改1删除页数1/1[首页][上一页][下一页][尾页]共有9条记录费用类型工资添加日期2010/8/3115:54:49所属类型收入!修改添加收入、添加支出模块!一ttinclude file二〃conn.asp〃--!--ttinclude file二〃heck.asp〃一%idd二Request.Cookies〃id〃InOut=Request〃add〃If Request,formadd=添加〃Thenadddate=Request.Form〃adddate〃seipayer=Request.Form,,selpayerz,seitype=Request.Form,,seltype,/moneys=TrimRequest.Formmoneyspjna=TrimRequest.Formpjna ifseitype=〃〃thenResponse.Write,zscriptalert请先添加相关费用类型!’;location=add_type.asp〈/SCRIPT”end ifSet rs=Server.CreateObject^ADODB.RecordSet,z Sql=Select*From[list]Where IDis null”rs.Open Sql,Conn,1,3rsInOut〃=InOutrs,,PayTypeID,/=seitypersMoneys=moneysrs Project=pjnarsaddTime=adddate rs〃user〃=iddResponse.Write,,scriptalert操作成功’;this,location.href=,pay.asp;〈/SCRIPT〉”Endif%html headtitle/titlemeta http-equiv二〃Content-Type“content二〃text/html;charset=gb2312〃/LINK href=css.css〃type=text/css rel=stylesheet//headbodyscript language二〃JavaScript src二〃time.js〃〉〈/SCRIPTscript language=javascript〉function CheckFormO{if document,forml.adddate,value=二〃〃alert〃请选择日期〃;return false;if document,forml.moneys,value=二〃〃alert〃金额不能为空〃;document,forml.moneys,focus;return false;}if document,forml.pjna.value=二〃〃alert〃工程名称不能为空〃;document,forml.pjna.focus;return false;/scripttable width=//100%/ztrtd height=〃25/tdX/tr〈/tabletable width=〃100%〃border=〃0〃align=center cellpadding=,/4z,cellspacing=〃1〃bgcolor=,,#eeeeeez,form action=〃〃method=post name=forml onSubmit二〃return CheckFormO,ztr bgcolor=fffffftd height=25colspan=5align二〃center bgcolor=〃#F9F9F9〃Xb%If InOut=l ThenResponse.Write”〈font color=blue添加收入/font〉〃ElseResponse.Write”〈font color=red添加支出/font〃End if%/b/td/trtr bgcolor=fffffftd width=〃35%〃align=right”〉日期:/div/tdtd colspan=〃4〃Xinput name=adddate〃type=〃text〃size=〃22〃maxlength=22〃readonly/input onClick=,,popUpCalendar this,forml.adddate,yyyy-nrnr-dd〃type=〃button value=〃选/trtr bgcolor=ffffff td align=〃right〃费用类型/td td colspan=,,4,zselect name=,,seltype,z%set rs=server,createobject/zadodb.recordsetsql二〃select*from[type]Where user=idd〃and InOut=〃InOut〃〃rs.open sql,conn,1,1sei二〃selected”response.write”〈option〃sei〃value=〃+CStrrs〃ID〃+〃name=seltype/z+rs〃PayType〃+〃〈/optionz,+chr13+chr10loop/select font color二〃red〃X--请选择/fontX/td〉/trtr bgcolor=ffffff td align二〃right〃金额〈/td〉tdcolspan=〃4〃input name二〃moneys“type二〃text“size=20〃maxlength=〃10〃/输入数字整数如250/td/trtr bgcolor=fffffftd Xdivalign=right”工程名称:/div/tdtd colspan二〃4〃Xinput name二〃pjna〃type二〃text“size=〃50〃maxlength=〃50〃//td我们的每个人生活都离不开计算机的帮助了越来越多的个人应用软件成为了人们重要的助手,也在潜移默化的改变着我们的生活随着市场经济的开展,我国居民对理财有着越来越高的要求理财,是每个家庭和个人所必须面对的问题现在,关于企业的会计制度逐渐完善,而且针对企业的财务软件以及EPRenterprise resourceplanning系统也在飞速开展,但针对个人或家庭的财务系统目前还是一段空白实际生活中经常要对个人的各项财务收支进行管理,本课题的目的就是利用计算机对各项财务进行电子化的管理,使我们的理财更加方便和理性化,提升我们生活的质量和品位课题意义我们经常看到企业的一些财务报表,这些报表主要是关注企业的资产负债表和损益表简单的说,前者是反映这个企业有多少钱,是存量;后者,反映了企业在一定时间能赚到多少钱,是流量其实,对一个人或者家庭的财务情况,也是关注这两个方面关注家里存多少钱,关注今年赚了多少钱,花了多少,借出什么等等要做到这些需要对大量的数据做存储和计算,工作是相当的复杂繁琐和枯燥的,因而这些问题容易被人忽略我们纵然可以为生活中的每一笔花销记账,但是对这样大量的数据做分类处理确实是一个会令大多数人头疼的问题,如果有一个个人理财的软件理财的软件对我们的日常财务进行那样的繁琐的数据处理和计算工作,相信可以让我们理财的效率大大提高这样一个软件不但可以方便我们的生活,更可以使我们对自己的财务状况有一个清楚的了解与此同时,这样的一个软件开发和制作也是对我们大学学到各种知识进行的一次综合运用的一个好时机,是对我大学学习的一个检验和实践第2章可行性分析
2.
2.1可行性分析当接受一个软件开发任务,就进入软件生命的第一个阶段,即进行可行性的研究并不是所有问题都具有简单的解决方法,许多问题不能在预定的规模之内解决可行性分析就是在系统调查的基础上,针对新系统的开发是否具备必要性和可能性,对新系统的开发从技术、经济、社会的方面进行分析和研究,以防止投资失误,保证新系统的开发成功可行性研究的目的就是用最小的代价在尽可能短的时间内确定问题是否能够解决技术可行性根据客户提出的系统功能、性能及实现系统的各项约束条件,根据新系统目标,来衡量所需的技术是否具备本系统主要采用数据库管理方法,效劳器选用微软的SQL Server2008数据库,他是它是目前能处理所有中小型系统最方便的流行数据库,它能够处理大量数据,同时保持数据的完整性并提供许多高级管理功能它的灵活性、平安性和易用性为数据库编程提供了良好的条件硬件方面,该系统短小精悍对赢家没有太大要求,只要能够运行Windows7就可以很好的运行该软件另外在划单操作中可用磁条来触发事件的响应,这项技术也已经很成熟
2.
1.3操作可行性本系统采用用户界面交互方式,并有必要的帮助信息,操作简单,用户只要具备简单的应用计算机的能力,无论学历,无论背景,均可以使用本系统,用户界面上的按钮的功能明确,用户一看就可以了解怎么使用本系统,以及本系统能够完成的功能,因此本系统在操作上是可行的
2.
1.2经济可行性估算新系统的本钱效益分析,其中包括估计工程开发的本钱,开发费用和今后的运行、维护费用,估计新系统将获得的效益,估算开发本钱是否回高于工程预期的全部经费并且,分析系统开发是否会对其它产品或利润带来一定影响本系统作为一个课程设计,没有必要考虑维护费用,以及本系统可获得的效益等问题法律及社会效益方面的可行性由于本系统只是一个课程设计,在图书馆查询相关资料因此不存在侵权等法律与社会影响方面的问题,不存在侵权级相应的法律问题关于效益方面,本系统仅仅是一个课程设计,只是为了提高自己的分析,设计能力,而非为了社会效益而编/trtr bgcolor=fffffftd colspan=〃5〃align二〃center Xinput type二〃submit“name=add〃value二〃添力口〃/X/td〉/tr/form/table/body/htnil日期:选择日期银行利息费用类<一请选择型(输入数字整数如250)金额:项目名称添加支出选择日期证券投资亏损▼〈一请选择日期:(输入数字整数如250)费用类型:添加收入添加收支明细统计模块!一ttinclude file二〃conn.asp〃--!--ttinclude file二〃heck.asp〃一%idd=Request〃id〃IfRequest〃del〃=〃del〃ThenSet rs=Conn.Execute Delete*From[list]where user=〃idd〃and ID=〃Request〃id〃Response.Write,zscriptalert操作成功;this,location.href=,pay.asp;〈/SCRIPT〉”End if%htmlheadmeta http-equiv二〃Content-Type“content二〃text/html;charset=gb2312〃/LINK href二〃css.css〃type=text/css rel=stylesheet//headbodyscript type二〃text/JavaScript〃〉function delpayifconfirm〃确定删除〃return true;else return false;/scripttable width=〃100%〃border=〃0〃align=center〃cellpadding=〃4〃cellspacing=〃1〃bgcolor=〃#eeeeee〃tr height=〃22〃valign二〃middle align=〃center”〉td height=〃25〃colspan=〃6〃bgcolor=〃#F9F9F9〃〉用户b%=Request〃user〃%〉〈/b〉nbsp;nbsp;nbsp;nbsp;nbsp;〈strong》收支明细表/strong〈/td/trtrtd width=〃8%height=〃30〃bgcolor=,,#FFFFFF,/align=〃center〃Xb编号/b/tdtd bgcolor=〃#FFFFFF〃@11811二〃31113r〃1〉工程名称儿/1^〉tdwidth=〃10%〃bgcolor=〃#FFFFFF〃align=centerb〉类型〈/bX/tdtd width=〃15%bgcolor=〃#FFFFFF〃align=centerXb〉金额/bX/td tdwidth=〃20%〃bgcolor=〃#FFFFFF〃align=center〃Xb〉添加日期/bX/td/tr%set rs=server.createobject^adodb.recordsetsql二〃select*from[list]where user=〃idd〃order byaddtime desc〃rs.open sql,conn,1,1const maxperpage=20每一页显示dim currentpagers.pagesi ze=maxperpagecurrentpage二request,querystring〃pageid〃if currentpage=〃〃thencurrentpage=lelseif currentpagelthencurrentpage=lelsecurrentpage=clngcurrentpageif currentpagers.pagecount thencurrentpage=rs.pagecount end ifend ififnot isnumericcurrentpagethencurrentpage=lend ifdimtotalput,n totalput=rs.recordcount iftotalput modmaxperpage=O thenn=totalput\maxperpage elsen=totalput\maxperpage+l end if ifn=0thenn=l end ifrs.movecurrentpage-1*maxperpage i=0typeid=rs〃PayTypeID〃set rs2=server.CreateObject Z,ADODB.RecordSet sql二〃select*from[type]Where id=〃typeid〃〃rs
2.Open Sql,conn,1,1In0ut=rs2InOut%tr td height=30〃bgcolor=〃#FFFFFF〃align=z,center,z%=rs,zid,z%/td tdbgcolor=〃#FFFFFF〃align=z,centerz,X%=rs//Project/,%/tdtd bgcolor=〃#FFFFFF align=/,centerz,%If In0ut=l ThenResponse.Write〃收入〃ElseResponse.Write〃支出〃End if%/tdtd bgcolor=〃#FFFFFF align二〃center”〉%If In0ut=l ThenResponse.Write”〈font color=〃〃blue〃〃〃rsMoneys〃/font〉〃ElseResponse.Write”〈font color=〃〃red〃〃一〃rsMoneys〃〈/font〉”End if%/tdtd bgcolor=〃#FFFFFF align=/,center,,X%=rs〃addTime〃%X/td/tr%i=i+1rs.movenext loop%/tabletable width=100%border=0cellspacing=O cellpadding=Otrtd height=15/td/trtrtd align=center〉页数%=currentpage%/%=n%%k=currentpage ifkOl then%[a href=ad_pay.asppageid=l首页/a]nbsp;nbsp;[a href=ad pay.asppageid=%=k-l%上一页/a]%else%nbsp;nbsp;[首页]nbsp;nbsp;[上一页]nbsp;%end if%%if kOnthen%[ahref=ad_pay.asppageid二〈%=k+l%〉下一页〈/a〉]nbsp;nbsp;href=ad_pay.asppageid=%=n%M页/a]%else%[下一页]nbsp;nbsp;[尾页]%end if%共有〈font color=red%=totalput%X/font条记录/td/trXtrXtd height=15/td/tr/table/body/html收支明细表帽号项目名环类型金集添加日期操作26八月份的基本生活费用支出-5002010-08-31修改1删除13领取八月份的工奥收入20002010-08-31修改1删除2S七月份的基本生活费用支出-5002010-07-31修改1删除12领取七月份的工夷收入20002010-07-31修改1删除14银行存款一年利息收入收入5002010-07-16修改1删除24六月份的基本生活费用支出-6002010-06-30修改1删除11领取六月份的工费(公司经营出问题,工费下趺)收入20002010-06-30修改1删除23五月份的基本生活费用支出-7002010-05-31修改1删除10领取五月份的工资收入22002010-05-29修改1删除22四月份的基本生活费用支出-4002010-04-30修改1删除9领取四月份的工资收入21502010-04-29修改1删除15购买中石化股票,斫将收益收入50002010-04-21修改1删除年度统计模块!--ttinclude file二〃conn.asp〃一!--ttinclude file=heck.asp〃--HTMLHEADTITLEX/TITLEMETA http-equiv=Content-Type content二〃text/html;charset=gb2312〃/LINK href二〃css.css〃type=text/css rel=stylesheet/B0DYSCRIPT language=javascriptfunction ChktheFormif theForm.nian.value==〃〃{alert〃请输入你要统计的年份!〃;theForm.nian.focus;return false;}else{updated,style,display=;}}/SCRIPTtable width=//100%/,Xtrtd height=〃10〃X/tdX/trX/tableTABLE width=〃100%〃border=0align=center cellPadding=4cellSpacing=l bgcolor=/,#eeeeee,zTB0DYTRF0RM name二〃Forml〃action=〃〃method二〃post〃onSubmit=,,return Chkthis;,ztd height=25colSpan=6align=middle bgcolor=〃#F9F9F9〃〉用户b%=Request/,user,,%X/b nbsp;nbsp;nbsp;nbsp;nbsp;SELECT name=nian〃〉option value=〃〃〉--请选择--/option%idd二Request〃id〃Set rs=Conn.Execute Selectdistinct yearaddTime From[list]where user=〃idd〃〃Do WhileNotrs.EofResponse.Write”〈option value=〃rs0〃’〉nbsp;nbsp;〃rs0〃〈/option〉”Loop%/SELECTnbsp;nbsp;nbsp;input type二〃submit〃name=〃go〃value二〃点击统计〃nbsp;nbsp;nbsp;font color=〃#ff0000〃X%=Request.Form/,nian,/%/font年度统计表〈/td〉/F0RM/TRTRtd colSpan=6align=middle bgcolor=〃#FFFFFF〃DIV id=updated style二〃DISPLAY:none align二〃center”〉table width=〃100%〃border=〃0〃align二〃center cellpadding=〃4〃cellspacing=〃4〃trtd height=〃50〃align二〃center”正在统计,请稍后...img height=〃15〃src=,/Images/loading.gifz/width=〃150〃〉/td/tr/tableX/DIV/td/TRX/TABLE/B0DY/HTML%if Request〃go〃二〃点击统计〃thenDim InMonth12,OutMonth12,SumMonth12Dim InTotel,OutTotel,SumTotelDim month12nian=Request.Form〃nian〃For i=l To12If i9Thenmonthi=nian〃-〃iElsemonthi=nian〃-0〃i EndifNext%tablewidth=/,100%,ztrtd height=〃2〃X/td/trX/tabletrtd height=30〃align二〃center bgcolor=”#F9F9F9”〈b费用类型/b*/tdwidth=〃7%〃bgcolor=/,#F9F9F9,/align二〃center〃Xbl月/b/td〉tdwidth=〃7%〃bgcolor=〃#F9F9F9〃align二〃center〃Xb2月/b/tdtdwidth=〃7%〃bgcolor=〃#F9F9F9〃align=,,center,,Xb3月/bX/td〉tdwidth=7%”bgcolor=〃#F9F9F9〃align=,,center,,Xb4月/bX/tdtdwidth=〃7%”bgcolor=〃#F9F9F9〃align=,,center,,Xb5月〈/b〉〈/td aligntdwidth=〃7%〃bgcolor=,,#F9F9F9,/二〃center〃Xb6月/bX/td align=,tdwidth=〃7%〃bgcolor=〃#F9F9F9〃/center,,Xb7月/b/td align=,,tdwidth=〃7%〃bgcolor=〃#F9F9F9〃center,,Xb8月/b/tdtdwidth=7%〃bgcolor=〃#F9F9F9〃align=center〃Xb9月〈/bX/td〉align=,,tdwidth=〃7%〃bgcolor=〃#F9F9F9〃center,zb10月/bX/td align=,,tdwidth=〃7%〃bgcolor=〃#F9F9F9〃center,zbl1月/b/td align=,tdwidth=〃7%〃bgcolor=〃#F9F9F9〃/center,,Xb12月/bX/tdaligntd width=〃7%〃bgcolor=〃#F9F9F9〃=center〃Xb〉合计/bX/td〉tdtable width=〃100%〃border=〃0〃align二〃center cellpadding=〃2〃cellspacing=〃1〃bgcolor=〃#eeeeee〃〉%Setrs=Server.CreateObject ADODB.RecordSet,zSql“Select ID,PayType,InOut From[type]where user=〃idd〃Order ByInOut desc,ID Asc〃rs.Open Sql,Conn,1,1If rs.Eof ThenResponse.Write align=〃center height=30colspan=14bgcolor=#ffffff没有,己录/td/tr,zElseFor i=l ToRecordCou%tr bgcolo厂〃#FFFFFF〃tdalign=center height=〃30〃X%=rs PayType%X/td〉%Totel=0J=1Do Untilj12Money=0Setrs2=Conn.Execute^Select MoneysFrom[list]Where user=〃idd〃and PayTypelD=〃rs〃id〃〃and addTimelike%〃monthj〃%〃If Notrs
2.Eof ThenIf rs〃InOut〃=1Then Money=Money+rs20Ifrs〃In0ut〃=0Then Money=Money-rs20LoopTotel=Totel+MoneyFor k=l To12If k=j ThenIfMoney0Then OutMonthk=OutMonthk+MoneyIf Money0Then InMonthk=InMonthk+MoneySumMonth k=SumMonth k+Money Endif NextIfMoney0Then Money=〈fontcolor=#ffOOOO〃Money〃〈/font〉〃Response.Write〃td align=center〉〃Money〃〈/td〃ElseResponse.Write〃td align=center〉0〈/td〃End ifJ=J+1Loop%td align二〃center”〉%If ToteKOThenResponse.Write〃fontcolor=,#ff0000z,Totel〃〈/font〃ElseResponse.Write TotelEndif%/td/tr%If ToteDOThen InTotel=InTotel+TotelIf ToteKOThen OutTotel=OutTotel+TotelSumTotel=SumTotel+TotelNextEnd if%tr bgcolor=〃#FFFFFF〃td height=〃30〃align二〃center”支出合计/td%For i=1To12If OutMonthi=Then OutMonthi=0%td align=/,center,,Xfont color=#ff0000X%=0utMonth i%X/font/td%Next%td align二〃center〃Xfont color=z/#ff0000,zX%=0utTotel%/fontX/td/trtr bgcolor=z,#FFFFFF,,td height=〃30〃align二〃center”〉收入合计〈/td〉%For i=l To12If InMonthi=〃Then InMonthi=0%td align=/zcenter,z%=InMonthi%X/td%Next%td align=,,center,,X%=InTotel%X/td/trtr bgcol厂〃#FFFFFF〃tdheight=30〃align二〃center〃b结算/b/td%For i=l To12If SumMonthi0Then SumMonthi=〈fontcolor=#FF0000〉〃SumMonthi〃〈/font〉”%td align=/,center,,b%=SumMonthi%/b/td%Next%td align^^center^Xfont color=,,blue,zb%=SumTotel%X/b/font/td/tr/table%endif%_▼点击统计年度统计表201I一请选择一2010一请选择一▼[点击统计〕2010年度统计表费用类型1月2月3月4月5月6月7月8月9月10月11月12月合计工奚20002100210021502200200020002000000016550奖金05000000000000500兼职0000000000000证券投趟益0005000000000005000银行利息00000050000000500房租-500000000000000-5000生活费-500-500-600-400-700-600-500-5000000-4300宴席费0-10000000000000-1000证券投奏亏损0-20000000000000-2000支出合计-5500-3500-600-400-700-600-500-5000000-12300收入合计20002600210071502200200025002000000022550结算-3500-90015006750150014002000150010250数据库连接模块%dim conndimconnstron errorresume nextconnstr二〃DRIVER={SQL Server;SERVER=local;UID=sa;pwd=123456;DATABASE=finance;set conn=server.createob ject,ZADODB.CONNECT10Nz,conn,open connstrIf errThenSet Conn=nothingresponse,write〃数据库连接出错,请检查连接字串〃end If%创立数据finance的脚本代码USE[finance]GOSET ANSI_NULLS ONGOSETQUOTED_IDENTIFIER ONGOCREATETABLE[dbo].[user][ID][int]NOT NULL,[username][nvarchar]50NULL,[password][nvarchar]50NULL,[admin][int]NULLON[PRIMARY]GOSET ANSI_NULLS ONGOSETQUOTED^IDENTIFIER ONGOCREATETABLE[dbo].[type][ID][int]NOT NULL,[PayType][nvarchar]50NULL,[InOut][int]NULL,[date][datetime]NULL,[user][int]NULLON[PRIMARY]GOSET ANSI_NULLS ONGOSETQUOTED_IDENTIFIER ONGOCREATETABLE[dbo].[list][ID][int]NOT NULL,[PayTypelD][int]NULL,[Moneys][int]NULL,[Project][nvarchar]50NULL,[addTime][nvarchar]50NULL,[user][int]NULLON[PRIMARY]GO结论个人财务管理信息系统,本质上是对数据库的更新和检索不知不觉一周的课程设计就结束了,我们小组有最开始的对系统的理解很模糊,我们在网上简要了解了个人财务管理的工作流程,并经过和王老师的讨论初步了解了这个系统的功能需求和较详细的工作流程,由于我们课设时间太短不能完全实现财务管理的全部的复杂流程通过这一周的课程设计,我们对学过的软件工程理解的更深了,根本了解了整个软件设计的过程,对数据流图的设计过程更加清楚,进一步懂得了需求分析阶段的重要性,因为你不了解现实世界中业务流程的话,那你就不能用软件模拟这个业务流程,整个软件设计就无从下手另一方面如果你在需求分析阶段对系统功能理解错误,那你设计的软件会完全失败在设计过程中我也加深了对数据库相关知识的理解.,再设计数据库是提取实体联系的过程就是对整个系统的分析过程有数据库向关系模型映射完成后,将关系模型以二维表的形式存储在计算机内部,就可以用Select语句实现检索和视图显示过程了整个程序虽然没有通过代码完全实现,但是整个撑血的结构已经出现在我的面前,只要通过运用一种熟练的语言就可以完全实现以上所有的功能,可见,软件工程这门课程在整个软件开发中的重要意义我们的整个设计过程是对系统的一点点加深理解的过程我们通过讨论,对系统实现的功能进一步清楚,对模糊的写设计,因此社会效益方面也是可行的第3章需求分析
3.1用户需求本系统是针对用户要求,使用计算机对自己日常的资金和物品的收入、支出以及相关的各种信息进行记录、修改、添加、删除等操作,并实现对信息进行统计和以文档形式输出的操作而设计的一种现代化个人财务管理软件经过分析,本系统需要具有以下功能
1、能够实现个人财务管理方面各项功能,能成功的对用户各种信息进行管理
2、实现查询、修改、删除、添加数据方便,数据的稳定性和可靠性好
3、能够实现按日期查询以及对库存数据进行按月统计和以文本形式输出
4、拥有良好的人机交互界面
3.2功能需求系统业务需求本系统具有以下几个功能模块用户登录模块、系统管理模块、收支管理模块、报表统计模块用户登录模块为每个用户分配账号密码使得个人的财务信息具有隐私性,收支管理模块能有效的管理用户的现金,可以进行添加,查询,删除操作,报表统计模块使得用户能够查询用户某月的金钱和物品统计信息,能够让用户对自己每月或一段时间的收支情况,系统管理模块可以让用户修改密码登陆功能对于个人财务管理系统,我们要求软件满足用户对个人财务的隐私性管理,确保在用户以外的其他人使用软件对其信息进行操作,所以要采用用户注册和登录制度,确保用户对自己财务信息的隐私管理收支管理模块功能现金管理模块是用户对现金进行添加、删除、修改操作的模块,提供用户对现金的收入支出进行操作的功能,使得当用户的记录需要修改时,可以方便的添加和修改报表统计管理模块提供用户对现金收支信息和物品收支信息进行统计输出功能系统管理模块系统管理模块提供用户对用户个人信息的管理和修改的功能系统技术需求稳定性本系统为财务管理系统,多为查询、修改、删除、添加数据等操作,要求数据的稳定性好可靠性用户财务数据多比较重要,要求系统具有数据备份,数据恢复等性能平安性系统设计个人银行账号以及密码的保存,要求系统提供加密保存等平安措施,即要求系统有较高的平安性能数据流图功能需求我们通过问老师,王老师,穆老师也给我们透彻的分析解释我们每个人都通过课程设计对理论知识的理解进一步加深,也对学科间的相互联系真正做到了学以致用另一方面对收集资料、查阅文献、方案制定等实践能力也得到了很好的锻炼,促进了我对所学知识的应用能力;同时,发现问题、分析归纳、综合比较的逻辑分析能力、处理问题等能力也得到了很好的提高本课程设计不管是对软件工程的理解还是对数据库的理解都上升了一个高度,让我们体会到了真正设计软件的大体流程,也增加对数据流图,状态转换图的熟悉程度,为我们以后做毕业设计打好基础,也为今后从事软件行业打好基础,总之,软件工程课程设计收获了很多,也想了很多,很有意义参考文献[1]谢世亮.Visual C#.NET世03开发与技巧[M].北京清华大学出版社,
2004.
5.[2](美)内格尔,《C#高级编程(第4版)》,清华大学出版社,出版2006年10月.[3](美)solid,《SQLServer2005从入门与精通(应用技术基础)》,清华大学出版社,出版2006年09月.[4]吴晨,《ASP.NET+SQL Server-数据库开发与实例》,清华大学出版社,出版2006年7月.[5]李春葆,曾慧.SQL Server2000学习与上机指导[M].北京清华大学出版社,
2005.
6.[6]张曜,张青.ASP.NET函数实用手册[M].北京冶金工业出版社,
2002.
12.[7]张华.Visual C#程序设计教程与上机指导[加・北京清华大学出版,
2005.
12.[8](美)保罗《ASP.NET
2.0经典教程C#篇》人民邮电出版社,出版2007年5月.[9]崔巍.数据库系统及应用[M].北京高等教育出版社,
2003.
6.[10]陈钟.C#编程语言程序设计与开发[M].北京清华大学出版社,
2004.
7.[11]李勇平.ASP.NET Web应用开发教程[M].北京北京希望电子出版社,
2005.
4.[12]杨帆.ASP.NET技术与应用[M].北京高等教育出版社,
2004.
7.□3]东方华人.ASP.NET数据库开发[M].北京清华大学出版社,
2004.
6.[14]田原.ASP.NET程序设计教程[M].北京:清华大学出版社,
2004.
6.[15]明月创作室.ASP.NET精彩变成百例[M].北京人民邮电出版社,
2002.
5.数据字典名称收支信息报表别名描述描述某日收支信息定义收入报表二【收入I支出】+金额+原因+日期位置显示给用户名称收支统计报表别名描述描述某月收支收支信息定义月收支信息、=收入总额+支出总额+日期位置显示给用途状态转换图状态转换图模拟系统的行为模型,把系统概括的分为几个状态,并表示触发状态转换的事件,由于该系统是医院内部使用的小型系统故不用设置登录功能,翻开系统自动初始化为等待状态,接受事件,并根据事件类型进入相应状选择仓触支收支管理收支白虔管殿驰计出错处理用户却用康梃图2武东图
4.
2.1ER图数据库的ER图如下所示:支出支出编号)(支出类型金额时间备注图
4.2ER图其中用户编号是用户的主键,每个用户都有唯一的编号,其中收入编号是收入的主键,收入类型包括买入、借入,收入,如果是金钱,金额就是金钱的数量,备注就是对事件的详细说明,支出联系同收入联系,支出类型包括借出、卖出、支出,备注可以填写用途或原因的说明第四章总体设计
4.1层次结构图把整个系统分为收支管理,报表统计管理,系统管理四个模块,收支管理模块分为添加收入,添加支出,修改收入,修改支出,查询收支,删除收支6个模块,统计管理模块分为物品统计信息,收支统计信息两个模块,收支管理模块分为修改密码,数据备份,数据恢复,系统说明,退出系统5个局部,每个模块完成的功能可以从名字上明显的看出层次从结构图如下所示图
4.1层次结构图
4.2数据库设计
4.
2.2数据库表序号字段英文取值约束空否默认主键/字段中文名名类型、宽度、精度值外键1用户编号UserID bigint否主键2用户名UserName varchar50否少于50字符3密码Password varchar50少于50字符否表
4.2支出信息表序号字段英文名取值约束空默认主键/字段中文名类型、宽度、精度否值外键1支出物资编PayoutID bigint否主键号2用户编号UserID bigint否外键3支出类型Paykind varchar50否4支出物资类payoutking Varchar50否型5支出金额PayAccount float否6支出时间PayTime date否7备注Remark varchar200少于200字符表
4.3收入信息表序号字段中文名字段英文取值约束空默认主键/名类型、宽度、精度否值外键1收入信息编IncomelD bigint否主键号2用户编号UserID bigint否外键3收入类型Inkind varchar50否4收入物资类Payinkind Varchar50否型5收入金额InAccount float否6收入时间InTime date否7备注Remark varchar200少于200字符第五章详细设计
5.1界面设计:一个好的用户界面能够给用户一个好印象,甚至能够事半功倍,有的时候,即使软件设计的很好,但用户界面不符合用户操作的习惯,也可能会让用户不满意,因此说,一个好的用户界面是至关重要的本系统的界面设计如下主界面左侧有四个选项,分别对应层次图的四个模块,分别为用户收支管理,统计查询,系统管理,用户管理,每个选项下面还有相应的几个子选项,完成相应的添加、查询、修改、删除操作,右侧为正文局部,显示用户需要的信息用表单的形式显示出来输出的显示主要是对数据库的组合或单独查询得出的结果,三个表用用户的编号联系起来,在用户表中用户的编号是主键,在收入表中和支出表中则是作为外键,三个表组合查询就可以查到想要的所有信息其中收入类型填写金钱收入,借入物品,买入物品收入物资类型填写物品、金钱,支出类型填写金钱支出,物品借出,物品卖出;备注填写原因后用途2打开登录界面输入账号,密码T进入主界面图
5.1登录界面数据流程图登录模块代码:%if request〃admin〃二〃登陆〃thenUserName=request.formUserNamePassWd=md5request,form〃PassWd〃set rs=server.CreateObject Z,ADODB.RecordSet,zsql二〃select*from[user]where username=〃UserName〃〃rs.Open Sql,conn,1,1if rs/zpasswordzz OPassWdthenresponse.write,,scriptalert用户或密码错误’;location.href=,javascript:history.go-1’;/script〉”elseResponse.Cookies〃key〃二〃gu ke〃Response.Cookies〃key〃.expires=date+2Response.Cookiesuser=rsusername Response.Cookies〃user〃.expires=date+2Response.Cookies〃id〃=rs〃id〃Response.Cookies〃id〃.expires=date+2response,redirectadmin.asp〃endifendif%htmlheadmeta http-equiv二〃Content-Type“content二〃text/html;charset=gb2312〃/link href=〃css.css〃rel=〃stylesheet“type二〃text/css〃/〈title〉登陆页面〈/title》/headbodyscript language=javascript〉function CheckFormO{if document,forml.UserName.value二二〃〃alert〃用户不能为空〃;document,forml.UserName.focus;return false;if document,forml.Passwd.value二二alert〃密码不能为空〃;document,forml.Passwd.focus;returnfalse;/scripttable width=〃300〃align二〃center border=〃0〃cellspacing=〃0〃cellpadding=0〃form name=z,formlz,method=〃post action=〃index,asp onSubmit二〃return CheckFormOz,trtd height=〃95〃X/tdX/tr〉trtd height=〃35〃〉用户input type二〃text“name=UserName maxlength=〃16〃size=〃24〃//td/trtrtd height=〃35〃〉密码inputtype二〃password“name二〃Passwd maxlength=〃22〃size=〃24〃//td/trtrtd height=40〃align=,/centerz/inputtype=submit“name=admin“value=〃登陆〃//td/tr/form/table/body/html用户:密码:登陆添加用户模块!-ttinclude file二〃conn.asp〃一!--4include file二〃heck.asp〃一!--ttinclude file=〃md
5.asp〃--htmlheadtitle/titlemeta http-equiv二〃Content-Type“content二〃text/html;charset=gb2312〃/LINK href二〃css.css〃type=text/css rel=stylesheet//head%set rs=server.createobject,zadodb.recordsetsql二〃select*from[user]where id=〃Request.Cookies〃id〃rs.open sql,conn,1,1if rsadmin1thenResponse.Write,zscriptalert系统超时;this,location.href=,index,asp;〈/SCRIPT”end If。
个人认证
优秀文档
获得点赞 0