自考“计算机及应用”专业论文参考范文(27)
管理菜单页面
管理菜单页面有一个HTML表单,根据选择的按钮的不同,可以进行5种不同的操作:图书的归还、图书的编辑、图书的删除、图书的添加和类别的添加。不管选择了哪一个按钮,该表单都提交人其自身进行处理。
要进行图书的归还、图书的编辑、图书的删除三种操作,须先进行搜索,找到该书后,由图书Book.asp返回一个链接:
<% If Session(“Manager”) = 1 then %
<A HREF=“……/html/management_menu.asp?title=<% response.write RSBooks(”Title“) %&BOOKID=<% response.write RSBooks(”BOOKID“) %”管理员菜单</A
<% end if %
而管理者页面通过下列语句
<%=request.querystring(“title”)%
<inputzztype=hidden name=“BOOKID1”value=“<%=request.querystring(”BOOKID“)%
这样就将所找到的书的书号BookID、书名Title传递管理者页面。再进行所须操作。共有3个不同的铵纽,可以进行3种操作。若单击“修改”钮:
则重定向到编辑图书页面,同时把Bookid 传递给该页面。
Response.Redirect “。/edit_book.asp?BOOKID=”&request(“BOOKID1”)
将其他的情况需要建立到数据库的连接:
set conn = server.createobject (“adodb.connection”)
Conn.Open(“FILEDSN=c:Program FilesCommon FilesODBCData Sourcesms access database.dsn”)
if NOT isempty(Request.Form(“Delete”)) and request(“BOOKID1”)<“” then
conn.Execute “delete from LibBooks where BOOKID =”&request(“BOOKID1”)
end if
if (NOT isempty(Request.Form(“checkin”))) and request(“BOOKID1”)<“” then
conn.Execute “update LibBooks set checkedoutto= 0, status= 'Available' where BookID=”&Request(“BOOKID1”)
end if
页面中的添加新的种类部分包含一个文本控件和一个选择控件。其中选择控件是用所有已经存在的类别列表进行填充的,包括特殊类别 Top level ,该类别表明当前类别是处于类别层次结构中的最顶层。代码如下:
先用一个记录集来填充父类别选择控件:
set RSCategories = conn.Execute(“select CategoryName from LibCategories order by CategoryName”)
再用下列循环语句:
<%
Do Until RSCategories.EOF
%
<OPTION VALUE=“<% response.write RSCategories(”CategoryName“) %”<% response.write RSCategories(“CategoryName”) %</OPTION
<%
RSCategories.MoveNext
Loop
%
遍历RSCategories记录集中的每个记录,并作为一个选项添加到列表中,而记录集中CategoryName 同时作为显示值和传递值:
本页面还包含一个指向添加图书页面的链接。
搜索结果页面
搜索页面的代码获取与访问者查找规则相匹配的图书,然后将这些图书显示给访问者。
搜索页面上的表单包含一个选择控件和一个文本控件。选择控件中的选项是用可搜索 的字段填充的:
需要用一个记录集来保存与访问者的查找规则相匹配的记录:
set RSBooks = conn.Execute(“select BookID, Author, Title, Subject from LibBooks where ” _
& Request.Form(“SearchField”) & “ Like '%” & Request.Form(“SearchCriteria”) & “%'”)
注意:,符号%表示的是一个广义搜索。这一点类似于ACCESS中的符号*.
然后将所找到的书以表格形式显示出来。代码如下:
<% Do Until RSBooks.EOF %
<TR VALIGN=“top” ALIGN=“left”
<TD WIDTH=40% height=“20”<B书名:</B <A HREF=“……/html/book.asp?BookID=<% Response.Write RSBooks(”BookID“) %”<% Response.Write RSBooks(“Title”) %</A</TD
<td width=20% height=“20”<B著者:</B <% Response.Write RSBooks(“Author”) %</td
<td width=30% height=“20”<B主题:</B <% Response.Write RSBooks(“Subject”) % </td
<% RSBooks.MoveNext
Loop %
【自考“计算机及应用”专业论文参考范文(27)】相关文章:
热点推荐:
工学
- 2020-11-17【工学】2012年自考“工程项目管理”单选练习(9)
- 2020-11-17【工学】2012年自考“互联网软件应用与开发”复习资料(1)
- 2020-11-17【工学】2012年自考“互联网软件应用与开发”复习资料(18)
- 2020-11-17【工学】2012年自考“互联网软件应用与开发”复习资料(34)
- 2020-11-17【工学】2012年自考“互联网软件应用与开发”复习资料(35)
- 2020-11-17【工学】2012年自考“互联网软件应用与开发”复习资料(38)
- 2020-11-17【工学】2012年自考“互联网软件应用与开发”复习资料(41)
- 2020-11-17【工学】2012年自考“互联网及其应用”串讲笔记(1)
其他最新资讯
- 2023-12-29【自考政策】广西自考网络助学平台新增61门课程
- 2020-12-04【免考问题】哪些证书可以免考自考相关课程?
- 2020-12-04【免考问题】自考免考有哪些条件?
- 2020-12-04【综合问题】自考本科文凭有用吗?
- 2020-12-04【综合问题】自考本科需要考多少门课?
- 2020-11-17【综合问题】江苏省高等教育自学考试网上报名常见问题及解答
- 2020-11-17【经济学】2012年自考“中国税制”笔记串讲(8)
- 2020-11-17【自考政策】全国自考办领导:未来自考将大力发展网络助学
网友关注
- 【考务考籍】安徽铜陵08年关于补办自考准考证通知
- 【自考毕业】办理北京04年上半年自考毕业手续的通知
- 【考务考籍】乌鲁木齐08年4月自考补报名正在进行
- 【考务考籍】河南省08上半年自考补报及确认时间
- 【考务考籍】济南市08年4月停考文化产业本科通知
- 【考务考籍】青海西宁市08年自考政策咨询热线开通
- 【考务考籍】辽宁省08上半年自考实践环节课程安排
- 【考务考籍】重庆经济管理类本科公共政治课调整通知
网友关注视频
- 沪教版牛津小学英语(深圳用) 五年级下册 Unit 12
- 沪教版八年级下册数学练习册20.4(2)一次函数的应用2P8
- 外研版英语三起6年级下册(14版)Module3 Unit1
- 8.对剪花样_第一课时(二等奖)(冀美版二年级上册)_T515402
- 第五单元 民族艺术的瑰宝_15. 多姿多彩的民族服饰_第二课时(市一等奖)(岭南版六年级上册)_T129830
- 小学英语单词
- 【部编】人教版语文七年级下册《老山界》优质课教学视频+PPT课件+教案,安徽省
- 沪教版牛津小学英语(深圳用) 四年级下册 Unit 7