?? customorder.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="chk.asp"-->
<!--#include file="db_conn.asp"-->
<!--#include file="../my_libs/my_request.asp"-->
<!--#include file="../my_libs/my_lib.asp"-->
<!--#include file="../my_libs/pages.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建網頁 1</title>
<link rel="stylesheet" type="text/css" href="style_admin.css" />
</head>
<body>
<p><b>預定訂單管理<font face="宋體" color="#FF6600">↓</font></b></p>
<table border="1" width="100%" id="table1">
<tr>
<td width="4%" class="top_td" align="center">ID</td>
<td width="10%" class="top_td" align="center">預定人姓名</td>
<td width="21%" class="top_td" align="center">預定時間</td>
<td width="22%" class="top_td" align="center">預定人聯系電話</td>
<td width="11%" class="top_td" align="center">來游人數</td>
<td width="15%" class="top_td" align="center">預定線路</td>
<td colspan="2" class="top_td" align="center">操作</td>
</tr>
<%
dim sql,rs,arrlist(6),i,ii
sql="select id,zm_username,zm_phone,zm_lvnums,zm_ydtime,zm_iscl,zm_lineid from ssort_order where zm_iscl=0 order by zm_ydtime desc"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if (rs.eof and rs.bof) then
response.write "<tr>"
response.write "<td class=12px width=100% colspan=8><font color=#FF0000>暫時還沒有任何數據</font></td>"
response.write "</tr>"
else
rs.PageSize =20 '每頁記錄條數
iCount=rs.RecordCount '記錄總數
iPageSize=rs.PageSize
maxpage=rs.PageCount
page=request("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rs.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
end if
ii=1
while not rs.eof and ii<=rs.pagesize
for i=0 to 6
arrlist(i)=rs(i)
next
%>
<tr>
<td width="4%" align="center"><%=(page-1)*19+ii%></td>
<td width="10%" align="center"><a href=userlist.asp?id=<%=arrlist(0)%>><%=arrlist(1)%></a></td>
<td width="21%" align="center"><%=arrlist(4)%></td>
<td width="22%" align="center"><%=arrlist(2)%></td>
<td width="11%" align="center"><%=arrlist(3)%></td>
<td width="15%" align="center"><a href=../lineDetail.asp?id=<%=arrlist(6)%> target=_blank>查看線路</a></td>
<td width="4%" align="center"><input type="button" value="刪除" name="B1" onclick="window.location='pro_order.asp?id=<%=arrlist(0)%>&action=del'"></td>
<td width="8%" align="center"><input type="button" value="審核處理" name="B2" onclick="window.location='pro_order.asp?id=<%=arrlist(0)%>&action=modi&flag=<%=arrlist(5)%>'"></td>
</tr>
<%
rs.movenext
ii=ii+1
wend
%>
</table>
<%call PageControl(iCount,maxpage,page,"border=0 width=100% align=center class=left_td ","<p align=right>")
rs.close
set rs=nothing%>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -