📄 orderdo.asp
字号:
<!--#include File="../ConnDB.asp"-->
<!--#include file="isAdmin.asp"-->
<%
Dim iflag,BtTitle
'iflag = 1 表示未处理；iflag = 2 表示已处理；
'iflag = 3 表示已发货；iflag = 4 表示已结账。
iflag = Request.QueryString("flag")
If iflag=1 Then
BtTitle="处理"
ElseIf iflag=2 Then
BtTitle="发货"
ElseIf iflag=3 Then
BtTitle="结账"
ElseIf iflag=4 Then
BtTitle = "删除"
End If
%>
<html>
<head><title>查询订单信息</title>
<link href="../style.css" rel="stylesheet">
<script language="javascript">
function newOrder(url) {
var oth="toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,left=200,top=200";
oth = oth+",width=500,height=150";
var newOrder=window.open(url,"newOrder",oth);
newOrder.focus();
return false;
}
//处理订单
function DOList(basketid,flag){
var url;
url = "OrderCheck.asp?flag=" + flag + "&id=" + basketid;
newOrder(url);
}
</script>
</head>
<body>
<br>
<table align=center border="1" width="100%" cellspacing="1" bordercolorlight="#63CFFF" bordercolordark="#FFFFFF">
<tr>
<td colspan="9"><font color="red"><%If iflag=1 Then%>未处理订单
<%ElseIf iflag=2 Then%>正在处理订单<%ElseIf iflag=3 Then%>已经发货订单
<%ElseIf iflag=4 Then%>已经结帐订单<%End If%></font></td>
</tr>
<tr>
<td align="center" bgcolor="#E1F5FF">订单号</td><td align="center" bgcolor="#E1F5FF">订购用户</td>
<td align="center" bgcolor="#E1F5FF">提交时间</td><td align="center" bgcolor="#E1F5FF">商品编号</td>
<td align="center" bgcolor="#E1F5FF">商品名称</td><td align="center" bgcolor="#E1F5FF">商品价格</td>
<td align="center" bgcolor="#E1F5FF">购买数量</td><td align="center" bgcolor="#E1F5FF">合计(元)</td>
<td align="center" bgcolor="#E1F5FF">处理订单</td>
</tr>
<%
sql="Select b.*,g.Name From Basket b,Goods g Where b.AdminChecked="&iflag&" And b.GoodsId=g.Id"
Set rs = Conn.Execute(sql)
If rs.Eof Then
%><tr><td colspan="9" align="center">没有订单的信息</td></tr>
<%Else
Dim total
total = 0
Do While Not rs.Eof
total = total + Cint(rs("OrderCount"))*Cint(rs("SalePrice"))
%>
<tr>
<td align="left"><%=rs("OrderNumber")%></td>
<td align="center"><%=rs("UserId")%></td>
<td align="center"><%=rs("PostTime")%></td>
<td align="center"><%=rs("GoodsId")%></td>
<td align="center"><%=rs("Name")%></td>
<td align="right"><%=rs("SalePrice")%>元</td>
<td align="right"><%=rs("OrderCount")%></td>
<td align="right"><%=Cint(rs("OrderCount"))*Cint(rs("SalePrice"))%></td>
<td align="center"><input type="button" name="doorder" value="<%=BtTitle %>" onClick="return DOList(<%=rs("Id")%>,<%=CInt(iflag)+1%>)"></td>
</tr>
<% rs.MoveNext
Loop
End If
rs.Close%>
<tr><td colspan="9" align="right"><font color=red>总计：<%=total%>元</font></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -