okid="%26amrequest("bookid1")
将其他的情况需要建立到数据库的连接：
setco=server.createobject("adodb.coection")
co.open("filed=c:\programfiles\commonfiles\odbc\datasources\msaccedatabase.d")
ifnotisempty(request.form("delete"))andrequest("bookid1")%26ltgt;""then
co.execute"deletefromliookswherebookid="%26amrequest("bookid1")
endif
if(notisempty(request.form("checkin")))andrequest("bookid1")%26ltgt;""then
co.execute"updateliooketcheckedoutto=0,status=availablewherebookid="%26amrequest
("bookid1")
endif
页面中的添加新的种类部分包含一个文本控件和一个选择控件。其中选择控件是用所有已经存在的类别列
表进行填充的，包括非凡类别toplevel，该类别表明当前类别是处于类别层次结构中的最顶层。代码
如下：
先用一个记录集来填充父类别选择控件：
setrscategories=co.execute("selectcategorynamefromlibcategoriesorderby
categoryname")
再用下列循环语句：
<
dountilrscategories.eof
>
rscategories("categoryname")%26gtlt;/optiogt;
<
rscategories.movenext
loop
>
遍历rscategories记录集中的每个记录，并作为一个选项添加到列表中，而记录集中categoryname同时
作为显示值和传递值：
本页面还包含一个指向添加图书页面的链接。
搜索结果页面
搜索页面的代码获取与访问者查找规则相匹配的图书，然后将这些图书显示给访问者。
搜索页面上的表单包含一个选择控件和一个文本控件。选择控件中的选项是用可搜索的字段填充的：
需要用一个记录集来保存与访问者的查找规则相匹配的记录：
setrooks=co.execute("selectbookid,author,title,subjectfromliookswhere"_
%26amrequest.form("searchfield")%26am"like"%26amrequest.form("searchcriteria")%26am"")
注重：，符号表示的是一个广义搜索。这一点类似于acce中的符号*。
然后将所找到的书以表格形式显示出来。代码如下：
rooks("bookid")>"%26gtlt;reoe.writerooks("title")%26gtlt;/a%26gtlt;/td>
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>