?? orderform.asp
字號:
<!--#include file="conn.asp"-->
<%if request.cookies("shopzhiwang")("username")="" then
response.write "<script language=javascript>alert('對不起，您還沒有登陸！');history.go(-1);</script>"
response.End
end if%>
<!--#include file="webconfig.asp"-->
<html>
<head>
<title><%=webname%>--訂單詳細資料</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="inc/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%dim dingdan
dingdan=request.QueryString("dan")
set rs=server.CreateObject("adodb.recordset")
rs.open "select sh_chanpin.bookid,sh_chanpin.bookname,sh_chanpin.shichangjia,sh_chanpin.huiyuanjia,sh_action.actiondate,sh_action.shousex,sh_action.danjia,sh_action.feiyong,sh_action.fapiao,sh_action.userzhenshiname,sh_action.shouhuoname,sh_action.dingdan,sh_action.youbian,sh_action.liuyan,sh_action.zhifufangshi,sh_action.songhuofangshi,sh_action.zhuangtai,sh_action.zonger,sh_action.useremail,sh_action.usertel,sh_action.shouhuodizhi,sh_action.bookcount from sh_chanpin inner join sh_action on sh_chanpin.bookid=sh_action.bookid where sh_action.username='"&request.Cookies("shopzhiwang")("username")&"' and dingdan='"&dingdan&"' ",conn,1,1
if rs.eof and rs.bof then
response.write "<center>此訂單中有商品已被管理員刪除，無法進行正確計算。<br>訂單取消，請通知管理員或重新下訂單！</center>"
response.End
end if
%>
<table width="750" border="0" cellspacing="0" cellpadding="0" align="center" height="374">
<tr>
<td height="10"></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td rowspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="12v">
<tr>
<td class="12v" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%">
<tr>
<td>
<table width="98%" border="0" cellpadding="1" cellspacing="1" bgcolor="#FFCC00" align="center">
<tr bgcolor="#FFFFFF">
<td colspan="2" height="22"><strong>訂單號：<font color="#FF0000"><%=dingdan%></font> ，詳細資料：</strong></td>
</tr>
<tr bgcolor="#FFFFFF">
<td style='PADDING-LEFT: 10px'>訂單狀態：</td>
<td width="87%">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<form name="form1" method="post" action="saveorderform.asp?dan=<%=dingdan%>&action=save">
<td >
<%zhuang()%>
<br>
<%if rs("zhuangtai")<>5 then %>
<input type="image" border="0" name="submit" src="images/ddzt.gif" width="84" height="18" >
<%else
response.write "<font color=red><b>訂單工作流程全部完成</b></font>"
end if%>
</td>
</form>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="13%" style='PADDING-LEFT: 10px'>商品列表：</td>
<td>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFCC00">
<tr bgcolor="#FFFFEE">
<td height="22" align="center">商品名稱</td>
<td height="22" align="center">訂購數量</td>
<td height="22" align="center">會員價格</td>
<td height="22" align="center">金額小計</td>
</tr>
<%zongji=0
do while not rs.eof%>
<tr bgcolor="#FFFFFF">
<td height="22" align="center" style='PADDING-LEFT: 5px'><a href=list.asp?id=<%=rs("bookid")%> target=_blank><%=trim(rs("bookname"))%></a></td>
<td height="22" align="center"><%=rs("bookcount")%></td>
<td height="22" align="center"><%=rs("danjia")&"元"%></td>
<td height="22" align="center"><%=rs("zonger")&"元"%></td>
</tr>
<%zongji=rs("zonger")+zongji
feiyong=rs("feiyong")
rs.movenext
loop
rs.movefirst%>
</table>
</td>
</tr>
<%set shopzhiwang=server.CreateObject("adodb.recordset")
shopzhiwang.open "select * from sh_action_jp where username='"&request.cookies("shopzhiwang")("username")&"' and dingdan='"&dingdan&"'",conn,1,1
if shopzhiwang.recordcount>0 then%>
<tr bgcolor="#FFFFFF">
<td width="13%" style='PADDING-LEFT: 10px'>獎品列表：</td>
<td>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFCC00">
<tr bgcolor="#FFFFEE">
<td height="22" align="center">獎品名稱</td>
<td height="22" align="center">所用積分</td>
</tr>
<%while not shopzhiwang.eof%>
<tr bgcolor="#FFFFFF">
<%
set web7671=server.CreateObject("adodb.recordset")
web7671.open "select * from sh_award where bookid="&shopzhiwang("bookid"),conn,1,1
if web7671.recordcount=1 then
%>
<td height="22" align="center"><a href=list_award.asp?id=<%=shopzhiwang("bookid")%> target=_blank><%=trim(web7671("bookname"))%></a></td>
<%end if
web7671.close
set web7671=nothing%>
<td align="center" height="22"><%=shopzhiwang("point")%></td>
</tr>
<%shopzhiwang.movenext
wend%>
</table>
</td>
</tr>
<%end if
shopzhiwang.close
set shopzhiwang=nothing%>
<tr bgcolor="#FFFFFF">
<td height="22" colspan="4" align="center"> <b>訂單總額：<%=zongji%>元＋費用：<%=feiyong%>元 共計：<%=zongji+feiyong%>元 </b>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td style='PADDING-LEFT: 10px' height="22">收貨人姓名：</td>
<td style='PADDING-LEFT: 10px' height="22"><%=trim(rs("userzhenshiname"))%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td style='PADDING-LEFT: 10px' height="22">收貨地址：</td>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -