web小型图书馆管理系统

整理文档很辛苦,赏杯茶钱您下走!

免费阅读已结束,点击下载阅读编辑剩下 ...

阅读已结束,您可以下载文档离线阅读编辑

资源描述

《Web程序设计》(2010-2011学年下学期)实验报告班级:08计算机科学与技术(2)学号:姓名:小型图书馆管理系统一、总体设计思想和结构:这是一个简单的图书馆管理系统,它包含管理员和读者两个权限,管理员可以添加、修改、删除书籍信息,读者可以查询书籍信息。一共包含14个文件,其文件名和作用分别如下:index.html:该系统首页,设有管理员和读者两个入口;mana.asp:管理员登录界面,若账号或密码错误,则重新输入,否则进入管理界面;checkpass.asp:检查管理员登录时,账号与密码输入是否正确;mmm.asp:管理员可操作界面,可分别进行修改、添加、删除书本信息,或返回首页;delete.asp:删除书本信息的关键程序;add.asp:添加书本信息的输入界面;do_add.asp:执行添加书本信息的关键程序;update.asp:更改书本信息的输入界面;do_update.asp:执行更改书本信息的关键程序;read.html:读者界面的框架结构;11.asp:框架结构的上面框架,可进行全部查询和按条件关键字查询书籍;22.html:框架结构的下面框架;allbook.asp:显示全部书籍的关键程序;search.asp:按条件关键字查询书籍的关键程序。二、系统流程图三、数据库结构数据库“lll”一共包含2张表,分别是book和manager。四、关键技术/关键代码1、11.aspbodycenterh2书籍查询/h2ahref=allbook.asptarget=22全部书籍/abrformmethod=postaction=search.asptarget=22按条件查询:br请输入关键字:inputtype=textname=keysize=10value=selectname=keoptionvalue=书名%Ifke=书名ThenResponse.WriteSelected%书名/a/optionoptionvalue=类型%Ifke=类型ThenResponse.WriteSelected%类型/a/optionoptionvalue=出版社%Ifke=出版社ThenResponse.WriteSelected%出版社/a/option/selectinputtype=submitvalue=查询/form/center/body2、add.aspdivid=Layer1style=position:absolute;width:360px;height:402px;z-index:1;left:21px;top:22px;formname=form2method=postaction=do_add.aspp书名textareaname=name1cols=45rows=3id=name1/textarea/pp作者textareaname=writer1cols=45rows=3id=writer1/textarea/pp价格textareaname=price1cols=45rows=3id=price1/textarea/pp类型textareaname=type1cols=45rows=3id=type1/textarea/pp出版社textareaname=press1cols=45rows=3id=press1/textarea/pp出版日期textareaname=date1cols=45rows=3id=date1/textarea/pinputtype=submitvalue=提交/form/div3、do_add.asp%IfRequest.Form(name1)AndRequest.Form(type1)ThenDimdbSetdb=Server.CreateObject(ADODB.Connection)db.opendriver={SQLserver};server=B46CDEFA3C304D2;userid=sa;password=sa;database=lllDimvarName,varWriter,varPrice,varTyp,varPress,varDate,strSqlvarName=Request.Form(name1)varWriter=Request.Form(writer1)varPrice=Request.Form(price1)varTyp=Request.Form(type1)varPress=Request.Form(press1)varDate=Request.Form(date1)StrSql=InsertIntobook(书名,作者,出版日期,价格,类型,出版社)Values('&varName&','&varWriter&','&varDate&','&varPrice&','&varTyp&','&varPress&')db.Execute(strSql)Response.Redirectmmm.aspElseResponse.Write必须填写书号、书名和类型!Response.WritebrResponse.Writeahref='add.asp'重新添加/aEndIf%4、allbook.asp%OptionExplicit%html%DimdbSetdb=Server.CreateObject(ADODB.Connection)db.Opendriver={SQLserver};server=B46CDEFA3C304D2;userid=sa;password=sa;database=lllDimstrSql,rsstrSql=Select*FrombookOrderBy书号DescSetrs=db.Execute(strSql)%centertableborder=1width=100%trbgcolor=#FF99FFtd书号/tdtd书名/tdtd作者/tdtd价格/tdtd出版社/tdtd出版日期/tdtd类型/td/tr%DoWhileNotrs.Eof%trtd%=rs(书号)%/tdtd%=rs(书名)%/tdtd%=rs(作者)%/tdtd%=rs(价格)%/tdtd%=rs(出版社)%/tdtd%=rs(出版日期)%/tdtd%=rs(类型)%/td/tr%rs.MoveNextLoop%/table/center/html5、delete.asp%DimdbSetdb=Server.CreateObject(ADODB.Connection)db.Opendriver={SQLserver};server=B46CDEFA3C304D2;userid=sa;password=sa;database=llldb.Executedeletefrombookwhere书号='&Request.QueryString(书号)&'Response.Redirectmmm.asp%6、checkpass.asp%Dimna,pwdna=Request.Form(n)pwd=Request.Form(pwd)Dimdb,rs,sqlSetdb=Server.CreateObject(ADODB.Connection)db.opendriver={SQLserver};server=B46CDEFA3C304D2;userid=sa;password=sa;database=lllsetrs=Server.CreateObject(ADODB.Recordset)sql=select*frommanagerwhere管理员名字='&na&'rs.opensql,db,1,1ifrs.eofthenResponse.Write(用户名不存在!)Response.Writeahref=mana.aspResponse.Write重新登录/aResponse.Endelseifrs(密码)pwdthenResponse.Write(密码输入错误!)Response.Writeahref=mana.aspResponse.Write重新登录/aResponse.EndelseResponse.Redirect(mmm.asp)Response.Endendifrs.closesetrs=nothingdb.closesetdb=nothing%7、do_update.aspstrSql=UpdatebookSet书名='&varName&',作者='&varWriter&',价格='&varPrice&',出版社='&varPress&',出版日期='&varDate&',类型='&varTyp&'where书号=&iddb.Execute(strSql)8、search.aspbodytableborder=1width=900align=centertrbgcolor=#B7B7B7align=centertdwidth=60height=30b书号/b/tdtdwidth=200b书名/b/tdtdwidth=120b作者/b/tdtdwidth=90b价格/b/tdtdwidth=200b出版社/b/tdtdwidth=120b出版日期/b/tdtdwidth=110b类型/b/td/tr%DimdbSetdb=Server.CreateObject(ADODB.Connection)db.Opendriver={SQLserver};server=B46CDEFA3C304D2;userid=sa;password=sa;database=lllDimkey,keIfRequest.Form(key)Thenkey=Request.Form(key)ke=Request.Form(ke)Elsekey=ke=书号EndIfDimSql,rsIfkeyThenSql=Select*FrombookWhere&ke&Like'%&key&%'ElseSql=Select*FrombookEndIfSetrs=db.execute(Sql)DoWhileNotrs.Eof%trbgcolor=#F2F2F2align=centertd%=rs(书号)%/tdtd%=rs(书名)%/tdtd%=rs(作者)%/tdtd%=rs(价格)%/tdtd%=rs(出版社)%/tdtd%=rs(出版日期)%/tdtd%=rs(类型)%/td/tr%rs.MoveNextLoop%/table/center/body五、运行结果及分析1、首页2、进入读者入口:点击“全部书籍”:按条件查询:输入关键字“清华”,选择出版社输入关键字“数”,选择书名输入关键字“教育类”,选择类型关键字为空,点击查询3、进入管理员入口,登录时填入错误账号chenyy若填入错误密码,则显示正确输入账号和密码,则进入管理界面:删除书号为“5”的书籍后:将“10”号书的类型修改为“神学类”:添加新书籍:添加界面如下:六、实验心得与体会本次实验属于综合型实验,原本应该把这个学期所有学到的知识都运用起来,但由于时间匆忙,没来得及应用得更多。这个小

1 / 10
下载文档,编辑使用

©2015-2020 m.777doc.com 三七文档.

备案号:鲁ICP备2024069028号-1 客服联系 QQ:2149211541

×
保存成功