📄 orderdeal.asp
字号:
<!-- #include file="../inc/conn.asp" -->
<!-- #include file="../inc/function.asp" -->
<%
if session("Sname") = "" then
%>
<SCRIPT language="javascript">
{
window.alert("您还没有登陆系统!");
window.location="default.asp";
}
</SCRIPT>
<%
response.end
end if
%>
<%
stat = request("stat")
if stat <> "" then
appstr = " and orderform.status = "&stat&""
appstr1 = " and orderform1.status = "&stat&""
end if
%>
<html>
<head>
<title>订单处理流程</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../inc/newdef.css" rel=stylesheet>
</head>
<body bgcolor=#6696bc link=#000000 vlink=#000000 text=#000000 leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!-- #include file="../inc/head.asp" -->
<hr>
<table width="100%" border="0">
<tr>
<td width="14%"><!-- #include file="../inc/orderleft.inc" --></td>
<td width="86%" valign="top">
<h3 align='center'>订单处理</h3>
<%
isok = request("isok")
order = request("order")
if isok <> "" then
out = "<font color=red><b>订单"&order&"修改成功</b></font>"
%>
<table width="200" border="0" align="center">
<tr>
<td><%=out%></td>
</tr>
</table>
<%
end if
%>
<form name ='country' action = 'orderdeal.asp' method='post'>
<input type="hidden" name="stat" value="<%=stat%>">
<table width="632" border="1" align="center">
<tr>
<td><div align="center">订单编号</div></td>
<td><div align="center">状态</div></td>
<td><div align="center">联系人</div></td>
<td><div align="center">产品总价</div></td>
<td><div align="center">下单日期</div></td>
<td><div align="center">操作</div></td>
</tr>
<%
sql = " SELECT orderform.fid, status.status, orderform.total, orderform.datetime, people.uname FROM orderform INNER JOIN "
sql = sql&"status ON orderform.status = status.sid INNER JOIN people ON orderform.uid = people.uid where 1=1 "&appstr&" order by orderform.fid desc"
rs.CursorType =3
rs.open sql,conn,1,1
if not rs.eof then
rs.PageSize=5'每页显示条数
page=clng(Request("page"))
if page<1 then page=1
if page>rs.PageCount then page=rs.PageCount
rs.AbsolutePage=page
for ipage=1 to rs.PageSize
recno= (page-1)* rs.PageSize +ipage
%>
<tr>
<td><div align="center">ky<%=rs("fid")%></div></td>
<td><div align="center"><%=rs("status")%></div></td>
<td><div align="center"><%=rs("uname")%></div></td>
<td><div align="center"><%=rs("total")%></div></td>
<td><div align="center"><%=mid(rs("datetime"),1,10)%></div></td>
<td><div align="center"><a href="order_info_operate.asp?fid=<%=rs("fid")%>">处理</a></div></td>
</tr>
<%
rs.MoveNext
if rs.EOF then exit for
next
end if
%>
<tr>
<td colspan="6">
<div align="right"> 第<b><font class="px14" color="#cc0000"><%=page%></font></b>页
<%
Response.Write "<a href='orderdeal.asp?stat="&stat&"&page=1'>[首页]</a> "
if page=1 then
Response.Write "上一页 "
else
Response.Write "<a href='orderdeal.asp?stat="&stat&"&page="&(page-1)&"'>[上一页]</a> "
end if
if rs.PageCount-page=0 then
Response.Write "下一页 "
else
Response.Write "<a href='orderdeal.asp?stat="&stat&"&page="&(page+1)&"'>[下一页]</a> "
end if
Response.Write "<a href='orderdeal.asp?stat="&stat&"&page="&rs.PageCount&"'>[末页]</a> "
rs.close
conn.close
%>
</div></td>
</tr>
</table>
<label></label>
</form> </td>
</tr>
</table>
</body>
</head>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -