📄 my_orderlist.asp
字号:
<!-- #include file="conn.asp" -->
<!--#include file="webconfig.asp"-->
<%
'url=request.servervariables("HTTP_REFERER")
if session("userid")="" then
//response.write "<script>alert('你还未登陆，或登陆已超时，请重新登陆！！');</script>"
response.write "<script>this.location.href='login_window.asp';</script>"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webname%></title>
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="include/top.asp" -->
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr valign="top">
<td width="1" bgcolor="#cccccc"></td>
<td width="160" height="100">
<!--#include file="include/left1.asp" -->
</td>
<td width="1" bgcolor="cccccc"></td>
<td align="center">
<!--#include file="include/search.asp" -->
<%
if session("userid")="" then
response.redirect "login_window.asp"
else
sql="select * from Net008_orderlist where userid='"&session("userid")&"' order by adddate desc"
set rs=server.createobject("adodb.recordset")
rs.open sql ,conn,1,2
%>
<table width="98%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td><b><font color=ff0000>
<%
if rs("guestname")="" then
response.write session("userid")
else
response.write rs("guestname")
end if
%>
</font></b>,您好！你的历史订单列表如下：</td>
</tr>
</table>
<table width="98%"
border=0 cellpadding=1 cellspacing=1 class="table_front">
<tbody>
<tr class="th_front1">
<td width=65 height=21 align="center"><b>订单号</b></td>
<td width="45" align="center"><b>收货人</b></td>
<td align="center"><b>订单状态</b></td>
<td width=90 align="center"><b>送货单位</b></td>
<td width=40 align="center"><b>包裹号</b></td>
<td width=60 align="center"><b>发货日期</b></td>
<td width=65 align="center"><b>订货日期</b></td>
<td width=40 align="center"><b>查看</b></td>
<td width=40 align="center"><b>取消</b></td>
</tr>
<%
if rs.recordcount<1 then
response.write"暂无订购单！"
'response.end
end if
const maxperpage=15 '定义每一页显示的数据记录的常量
dim currentpage '定义当前页的变量
rs.pagesize=maxperpage
currentpage=request.querystring("pageid")
if currentpage="" then
currentpage=1
elseif currentpage<1 then
currentpage=1
else
currentpage=clng(currentpage)
if currentpage > rs.pagecount then
currentpage=rs.pagecount
end if
end if
'如果变量currentpage的数据类型不是数值型
'就1赋给变量currentpage
if not isnumeric(currentpage) then
currentpage=1
end if
dim totalput,n '定义变量
totalput=rs.recordcount
if totalput mod maxperpage=0 then
n=totalput\maxperpage
else
n=totalput\maxperpage+1
end if
if n=0 then
n=1
end if
rs.move(currentpage-1)*maxperpage
i=0
do while i< maxperpage and not rs.eof
%>
<tr class="th_front2" style="cursor:hand" onClick="javascript:window.location.href='my_orderlist_show.asp?id=<%=rs("id")%>'">
<td width=65 height=21 align="center">
<%response.write rs("orderid")
%> </td>
<td width="45" align="center">
<%response.write rs("guestname")
%> </td>
<td align="center">
<%
order_status=rs("order_status")
cancelok=rs("cancelok")
if order_status=2 then
response.write "<font color=009900>货已发出</font>"
elseif order_status=3 then
response.write "<font color=cccccc>我已收到货</font>"
elseif order_status=4 then
response.write "<font color=0099CC>已收款正在配货打包</font>"
elseif order_status=5 then
response.write "<font color=9933FF>订单已确认请尽快汇款</font>"
elseif cancelok=3 then
response.write "<font color=993300>客户要求取消</font>"
else
response.write "<font color=ff0000>订单未确认</font>"
end if
%> </td>
<td width="90" align="center">
<%
if rs("sendmode")<>"" then
response.write rs("sendmode")
else
response.write "--"
end if
%> </td>
<td width="40" align="center">
<%
if rs("sendno")<>"" then
response.write rs("sendno")
else
response.write "--"
end if
%> </td>
<td width="60" align="center">
<%
if rs("senddate")<>"" then
response.write FormatDateTime(rs("senddate"),2)
else
response.write "--"
end if
%> </td>
<td width=65 align="center">
<%
response.write FormatDateTime(rs("adddate"),2)
%> </td>
<td width=40 align="center">
<input type="button" name="button1222" value="查看" onClick="javascript:window.location.href='my_orderlist_show.asp?id=<%=rs("id")%>'" class="sinput">
</td>
<td width="40" align="center">
<%
if cancelok=1 then
response.write "<font color='0000ff'>不能</font>"
elseif cancelok=2 then
response.write "能"
else
response.write "<font color='0000ff'>已取消</font>"
end if
%> </td>
</tr>
<%
i=i+1
rs.movenext
loop
%>
</tbody>
</table>
<br>
<table class=table_front cellspacing=1 cellpadding=0 width="98%" border=0>
<tbody>
<tr>
<td
height=22 colspan=3 align=middle class="th_front1">页数：<%=currentpage%>/
<% =n%>
<%k=currentpage
if k<>1 then%>
[<a href="my_orderlist.asp?pageid=1" class="LeftTypeLinkU">首页</a>] [<a href="my_orderlist.asp?pageid=<%=k-1%>" class="LeftTypeLinkU">上一页</a>]
<%else%>
[首页] [上一页]
<%end if%>
<%if k<>n then%>
[<a href="my_orderlist.asp?pageid=<%=k+1%>" class="LeftTypeLinkU">下一页</a>]
[<a href="my_orderlist.asp?pageid=<%=n%>" class="LeftTypeLinkU">尾页</a>]
<%else%>
[下一页] [尾页]
<%end if%>
共有<font color="red"><%=totalput%></font>个订单</td>
</tr>
</tbody>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td> </td>
</tr>
<tr>
<td><img src="images/yuandot.gif" width="12" height="12" align="absmiddle">
<b>订单状态说明（6种状态）：</b><font color="#0000FF"> </font></td>
</tr>
<tr>
<td align="center">
<table width="98%" border="0" cellpadding="1" cellspacing="1" class="table_front">
<tr>
<td height="18" class="th_front1">1.订单未确认：</td>
<td class="th_front2">说明你的订单没有与我们确认，请您主动与我们确认并尽快汇款给我们。</td>
</tr>
<tr>
<td height="18" class="th_front1">2.订单已确认请尽快汇款：</td>
<td class="th_front2">说明你的订单已经与我们确认了，但你还没有汇款给我们,请尽快去银行汇款。</td>
</tr>
<tr>
<td height="18" class="th_front1">3.已收款正在配货打包：</td>
<td class="th_front2">说明我们已收到该订单的款，正在为该订单的产品配货及包装中。</td>
</tr>
<tr>
<td height="18" class="th_front1">4.货已发出：</td>
<td class="th_front2">说明你订购的产品我们已发出了，还在运输过程当中。请您要注意查收！</td>
</tr>
<tr>
<td height="18" class="th_front1">5.客户要求取消：</td>
<td class="th_front2">说明这个订单是你本人要求取消，不想要该订单的产品。</td>
</tr>
<tr>
<td height="18" class="th_front1">6.我已收到货：</td>
<td class="th_front2">说明你已经收到该订单的产品，请做收到货确认。这样将会得到该订单的积分哦。</td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="images/yuandot.gif" width="12" height="12" align="absmiddle">
<b></b><b>汇款方式：</b><font color="#0000FF"> </font></td>
</tr>
<tr>
<td><font color="#0000FF"> 请您尽快依照您选择的付款方式进行汇款，我们收到你的汇款后就会立即给你发货的。如果需要其它银行的帐号请联系我们或留言或发邮件,汇款后请及时通知我们查款,最好也发个邮件通知我们,邮件内容包括以下内容：<br>
<font color="#993300">（汇款金额/汇款日期/汇款银行/汇款帐号/大概汇款时间/你的姓名/你的详细地址/邮政编码/联系电话等信息）</font></font></td>
</tr>
<tr>
<td align="center"> </td>
</tr>
</table>
<%end if%>
</td>
<td width="1" bgcolor="cccccc"></td>
</tr>
</table>
<!-- #include file="include/bottom.asp" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -