【正文】 r=BCD7E0 tr td width=35% bgcolor=F8FCFDdiv align=center input name=selectkey type=text id=selectkey onFocus==39。39。 value=請(qǐng)輸入關(guān)健字 /div/td td width=45% bgcolor=F8FCFDdiv align=center select name=selectm id=selectm size=1 option value=0選擇搜索方式/option option value=isbnISBN/option option value=name按圖書名稱/option option value=zuozhe按圖書作者/option option value=chubanshe按圖書出版社/option /select /div/td td width=20% height=30 bgcolor=F8FCFDdiv align=center input type=submit name=Submit2 value=搜 索 /div/td /tr /table /div /td/form /tr/table圖書定單管理是管理員對(duì)客戶定單的處理，及時(shí)合理的處理定單可以提高客戶的滿意度。這部分還包括定單的查詢。如圖68 圖68 管理圖書定單：table width=90% border=0 cellspacing=1 bgcolor=BCD7E0 tr td background=../images/manage/div align=centerfont color=000000管理圖書訂單/font/div/td /tr tr td height=167 valign=top bgcolor=F8FCFD table width=90% border=0 align=center cellpadding=2 cellspacing=1 tr tddiv align=right select name=zhuangtai onChange=var jmpURL=[].value 。 if(jmpURL!=39。39。) {=jmpURL。} else {=0 。} base target=Right option value=?zhuangtai=0 selected選擇查訊狀態(tài)/option option value=?zhuangtai=0 全部訂單狀態(tài)/option option value=?zhuangtai=1 未作任何處理/option option value=?zhuangtai=2 用戶已經(jīng)劃出款/option option value=?zhuangtai=3 服務(wù)商已經(jīng)收到款/option option value=?zhuangtai=4 服務(wù)商已經(jīng)發(fā)貨/option option value=?zhuangtai=5 用戶已經(jīng)收到貨/option /select /div/td /tr /table %39。開始分頁(yè) Const MaxPerPage=12 dim totalPut dim CurrentPage dim TotalPages dim j dim sql if Not isempty(request(page)) then currentPage=Cint(request(page)) else currentPage=1 end if set rs=() if namekey= then 39。//按狀態(tài)查詢 if zhuangtai=0 or zhuangtai= then select case zhuangtai case 0 select distinct(dingdan),userid,userzhenshiname,actiondate,songhuofangshi,zhifufangshi,zhuangtai from shop_action where zhuangtai6 order by actiondate desc,conn,1,1 case select distinct(dingdan),userid,userzhenshiname,actiondate,songhuofangshi,zhifufangshi,zhuangtai from shop_action where zhuangtai5 order by actiondate desc,conn,1,1 end select else select distinct(dingdan),userid,userzhenshiname,actiondate,songhuofangshi,zhifufangshi,zhuangtai from shop_action where zhuangtai=amp。zhuangtaiamp。 order by actiondate,conn,1,1 end if else 39。//按用戶查詢 if zhuangtai=0 or zhuangtai= then select distinct(dingdan),userid,userzhenshiname,actiondate,songhuofangshi,zhifufangshi,zhuangtai from shop_action where zhuangtai5 and username=39。amp。namekeyamp。39。 order by actiondate desc,conn,1,1 else select distinct(dingdan),userid,userzhenshiname,actiondate,songhuofangshi,zhifufangshi,zhuangtai from shop_action where zhuangtai=amp。zhuangtaiamp。 and username=39。amp。namekeyamp。39。 order by actiondate,conn,1,1 end if end if if 0 then 數(shù)據(jù)庫(kù)中無(wú)數(shù)據(jù) end if if And then p align=39。center39。 class=39。contents39。 對(duì)不起，您選擇的狀態(tài)目前還沒有訂單！/p else totalPut= if currentpage1 then currentpage=1 end if if (currentpage1)*MaxPerPagetotalput then if (totalPut mod MaxPerPage)=0 then currentpage= totalPut \ MaxPerPage else currentpage= totalPut \ MaxPerPage + 1 end if end if if currentPage=1 then showContent showpage totalput,MaxPerPage, else if (currentPage1)*MaxPerPagetotalPut then (currentPage1)*MaxPerPage dim bookmark bookmark= showContent showpage totalput,MaxPerPage, else currentPage=1 showContent showpage totalput,MaxPerPage, end if end if end if sub showContent dim i i=0 % table width=90% border=0 align=center cellpadding=1 cellspacing=1 bgcolor=BCD7E0 tr td bgcolor=F8FCFDdiv align=center訂單號(hào)/div/td td bgcolor=F8FCFDdiv align=center下單用戶/div/td td bgcolor=F8FCFDdiv align=center訂貨人姓名/div/td td bgcolor=F8FCFDdiv align=center付款方式/div/td td bgcolor=F8FCFDdiv align=center收貨方式/div/td td bgcolor=F8FCFDdiv align=center訂單狀態(tài)/div/td /tr %do while not dim ckxp,username set ckxp=() select username from [user] where userid=amp。rs(userid),conn,1,1 username=trim(ckxp(username)) set ckxp=nothing % tr td bgcolor=F8FCFDdiv align=centera href= onClick=javascript:(39。?dan=%=trim(rs(dingdan))%amp。username=%=username%39。,39。39。,39。width=710,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes39。)。return false。%=trim(rs(dingdan))%/a/div/td td bgcolor=F8FCFDdiv align=center%=username%/div/td td bgcolor=F8FCFDdiv align=center%=trim(rs(userzhenshiname))%/div/td td bgcolor=F8FCFDdiv align=center%dim rs