【正文】 anclassid=amp。actionamp。amp。searchkey=amp。filenameamp。contents39。contents39。center39。jiageamp。amp。anclassid=amp。actionamp。amp。?searchkey=amp。img src=images/ width=60 height=18 border=0/a% /div/td %end if% /tr %i=i+1if i=MaxPerPage then Exit Do loop set rs=nothing%/table% End Sub Function showpage(totalnumber,maxperpage,filename) Dim n If totalnumber Mod maxperpage=0 Then n= totalnumber \ maxperpage Elsen= totalnumber \ maxperpage+1 End If form method=Post action=amp。)。,39。,39。rs(bookid)amp。元/font%/div/td td bgcolor=F7FBFFdiv align=center % a href= onClick=javascript:(39。%/font%/div/td td bgcolor=F7FBFFdiv align=center%=font color=FF6600amp。元%/div/td td bgcolor=F7FBFFdiv align=center%=font color=FF6600amp。trim(rs(bookname))amp。trim(rs(bookid))amp。return false。width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes39。39。39。?id=amp。formatnumber(rs(huiyuanjia),2)amp。/a%/td td bgcolor=FFFFFFdiv align=center%=trim(rs(bookauthor))%/div/td td bgcolor=FFFFFFdiv align=center%=trim(rs(bookpublisher))%/div/td td bgcolor=FFFFFFdiv align=center%=trim(rs(bookdate))%/div/td td bgcolor=FFFFFFdiv align=center%=formatnumber(rs(shichangjia),2)amp。 target=_blankamp。判斷數(shù)字奇偶num1 = Num1+1If num1 Mod 2 = 0 Then% td bgcolor=FFFFFF style=paddingleft:6px% a href=?id=amp。center39。 and huiyuanjiaamp。searchkeyamp。jiage,conn,1,1case 4 select bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,isbn,bookdate from book where isbn=39。%39。%amp。 and huiyuanjiaamp。searchkeyamp。jiage,conn,1,1case 2 select bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,bookdate from book where bookauthor like 39。%39。%amp。分類為空。 and anclassid=amp。 and huiyuanjiaamp。searchkeyamp。anclassid,conn,1,1case 4 select bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,isbn,bookdate from book where isbn=39。jiageamp。%39。%amp。 and anclassid=amp。 and huiyuanjiaamp。searchkeyamp。anclassid,conn,1,1case 2 select bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,bookdate from book where bookauthor like 39。jiageamp。%39。%amp。判斷查詢分類,分類不為空。 ,conn,1,1end selectelse39。searchkeyamp。 ,conn,1,1case 4 select 37bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,isbn,bookdate from book where isbn=39。searchkeyamp。 ,conn,1,1case 3 select bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,bookdate from book where bookpublisher like 39。searchkeyamp。 ,conn,1,1case 2 select bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,bookdate from book where bookauthor like 39。searchkeyamp。普通查詢select case actioncase 1 select bookid,bookname,bookauthor,bookpublisher,shichangjia,huiyuanjia,dazhe,bookdate from book where bookname like 39。/fontend if%/td /tr/table%39。return true!include file=table width=776 height=5 border=0 align=center cellpadding=0 cellspacing=0 tr td height=5/td /tr/tabletable width=776 border=0 align=center cellpadding=1 cellspacing=1 tr td bgcolor=DEE7F7 style=paddingleft:6px%if searchkey= then 請(qǐng)您輸入查詢關(guān)鍵字else 您查詢的關(guān)健字是：font color=redamp。 charset=gb2312link href=images/ rel=stylesheet type=text/css/headbody leftmargin=0 topmargin=0 marginwidth=0 marginheight=0 onMouseOver==39。 } ()。alert(請(qǐng)輸入查訊關(guān)鍵字！)。打開(kāi)數(shù)據(jù)庫(kù)\ 31dim sitename,web,dizhi,youbian,dianhua,copyright,banner,logo,weburl,gonggaoset rs=()select sitename,web,dizhi,youbian,dianhua,copyright,gonggao,logo,weburl,banner from config,conn,1,1sitename=trim(rs(sitename))web=trim(rs(web))dizhi=trim(rs(dizhi))youbian=trim(rs(youbian))dianhua=trim(rs(dianhua))copyright=trim(rs(copyright))logo=trim(rs(logo))banner=trim(rs(banner))weburl=trim(rs(weburl))gonggao=trim(rs(gonggao))set rs=nothing 3 圖書(shū)查詢代碼 1). 2)1). tddiv align=centerfont color=008080 face=Verdana高級(jí)查找/font/div/td /tr tr td height=120 valign=toptable width=60% border=0 align=center cellpadding=2 cellspacing=2 bgcolor=FFFFFFform name=form2 method=post action= tr 32 td width=20% bgcolor=A4C3E6 style=paddingleft:6pxfont face=Verdana color=008080關(guān) 健 字/font：/td td width=80% bgcolor=A4C3E6 style=paddingleft:6pxinput name=searchkey type=text id=searchkey/td /tr tr td bgcolor=A4C3E6 style=paddingleft:6pxfont face=Verdana color=008080查找方式/font：/td td bgcolor=A4C3E6 style=paddingleft:6pxselect name=action id=action option value=1 selected書(shū) 名/option option value=2作 者/option option value=3出版社/option option value=4ISBN/option /select/td /tr tr td bgcolor=A4C3E6 style=paddingleft:6pxfont face=Verdana color=008080價(jià)格范圍/font：/td td bgcolor=A4C3E6 style=paddingleft:6pxselect name=jiage id=jiage option value=205 元以下/optionoption value=3010 元以下/option option value=50 selected15 元以下/option option value=100200 元以下/option /select/td /tr tr 33 td height=18 bgcolor=A4C3E6 style=paddingleft:6pxfont face=Verdana color=008080圖書(shū)分類/font：/td td bgcolor=A4C3E6 style=paddingleft:6px %set rs=() select * from shop_anclass order by anclassidorder,conn,1,1 % select name=anclassid option value=0查詢所有分類/option %do while not % option value=%=rs(anclassid)%%=trim(rs(anclass))%/option % loop set rs=nothing% /select