⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dingdan.asp

📁 采用asp+fso技术 傻瓜式的程序安装和调试 用户无需考虑系统的安装维护 美观、友好的展示铺面 设计中应用了多种网络安全技术 顾客可以方便的查询并订购商品 用户可以方便的定义各种商品信息
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="conn.asp"-->
<%if request.Cookies("BOB")("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="images/css.css" rel="stylesheet" type="text/css">
<body leftmargin="0" rightmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%dim dingdan
dingdan=request.QueryString("dan")
set rs=server.CreateObject("adodb.recordset")
rs.open "select shop_books.bookid,shop_books.shjiaid,shop_books.bookname,shop_books.shichangjia,shop_books.huiyuanjia,shop_action.actiondate,shop_action.shousex,shop_action.danjia,shop_action.feiyong,shop_action.fapiao,shop_action.userzhenshiname,shop_action.shouhuoname,shop_action.dingdan,shop_action.youbian,shop_action.liuyan,shop_action.zhifufangshi,shop_action.songhuofangshi,shop_action.zhuangtai,shop_action.zonger,shop_action.useremail,shop_action.usertel,shop_action.shouhuodizhi,shop_action.bookcount from shop_books inner join shop_action on shop_books.bookid=shop_action.bookid where shop_action.username='"&request.Cookies("BOB")("username")&"' and dingdan='"&dingdan&"' ",conn,1,1
if rs.eof and rs.bof then
response.write "<p align=center>此订单中有商品已被管理员删除,无法进行正确计算!<br>订单取消,请通知管理员或重新下订单!</p>"
response.End
end if
%>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr> <td height="10"></td></tr>
<tr>
<td> 
<table width="100%" border="0" cellpadding="5" cellspacing="1" bgcolor="#cccccc" align="center">
                          <tr><td colspan="3"> <strong><font color="#ffffff">订购数量订单号为:<font color="#FF0000"><%=dingdan%></font>,详细资料如下:</font></strong></td>
                          </tr>
                          <tr bgcolor="#FFFFFF"> 
                            <td width="15%" align="right">订单状态:</td>
                            <td colspan="2"> 
                              <table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
                                <tr> 
                                  <form name="form1" method="post" action="savedingdan.asp?dan=<%=dingdan%>&action=save">
                                    <td> 
                                      <%zhuang()%>
                                      <br>
					<%if rs("zhuangtai")<>5 then %>
					<input class="go-wenbenkuang" name="submit" value="修改订单状态" type="submit">
                                      <%else
					response.write "<font color=red><b>订单工作流程全部完成</b></font>"
					end if%>
                                    </td>
                                  </form>
                                </tr>
                              </table>
                            </td>
                          </tr>
                          <tr bgcolor="#FFFFFF"> 
                            <td align="right">商品列表:</td>
                            <td colspan="2"> 
                              <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#cccccc">
                                <tr align="center"> 
                                  <td><strong><font color="#ffffff">商品名称</font></strong></td>
                                  <td><strong><font color="#ffffff">订购数量</font></strong></td>
                                  <td><strong><font color="#ffffff">会员价格</font></strong></td>
                                  <td><strong><font color="#ffffff">金额小计</font></strong></td>
                                </tr>
                                <%zongji=0
		do while not rs.eof%>
                                <tr bgcolor="#FFFFFF"> 
                                  <td style='PADDING-LEFT: 5px' height="22"><a href=list.asp?id=<%=rs("bookid")%> ><%=trim(rs("bookname"))%></a></td>
                                  <td height="22"> 
                                    <div align="center"><%=rs("bookcount")%></div>
                                  </td>
                                  <td height="22"> 
                                    <div align="center"><%=rs("danjia")&"元"%></div>
                                  </td>
                                  <td height="22"> 
                                    <div align="center"><%=rs("zonger")&"元"%></div>
                                  </td>
                                </tr>
		<%zongji=rs("zonger")+zongji
		feiyong=rs("feiyong")
		rs.movenext
		loop
		rs.movefirst%>
                                <tr bgcolor="#FFFFFF"> 
                                  <td colspan="4" height="22"> 
                                    <div align="right">订单总额:<%=zongji%>元+费用:<%=feiyong%>元  共计:<%=zongji+feiyong%>元 
                                      &nbsp;&nbsp;&nbsp;&nbsp;</div>
                                  </td>
                                </tr>
                              </table>
                            </td>
                          </tr>
    <%set Godbook=server.CreateObject("adodb.recordset")
	Godbook.open "select * from shop_action_jp where username='"&request.Cookies("BOB")("username")&"' and dingdan='"&dingdan&"'",conn,1,1
	if Godbook.recordcount>0 then%>
						  <tr bgcolor="#FFFFFF"> 
                            <td align="right">奖品列表:</td>
                            <td colspan="2"> 
                              <table width="98%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#cccccc">
                                <tr align="center"> 
                                  <td><strong><font color="#ffffff">奖品名称</font></strong></td>
                                  <td><strong><font color="#ffffff">所用积分</font></strong></td>
                                </tr>
        <%
	while not Godbook.eof%>
        <tr bgcolor="#FFFFFF"> 
	<td height="22"> 
	<%
	set Godbook1=server.CreateObject("adodb.recordset")
	Godbook1.open "select * from shop_jiangpin where bookid="&Godbook("bookid"),conn,1,1
	if Godbook1.recordcount=1 then
	response.write Godbook1("bookname")
	end if
	Godbook1.close
	set Godbook1=nothing%>
	</td>
	<td align="center" height="22"><%=Godbook("jifen")%></td>
	</tr>
        <%
	Godbook.movenext
	wend%>
	</table>
	</td>
	</tr>
<%end if
Godbook.close
set Godbook=nothing%>
                          <tr bgcolor="#FFFFFF"> 
                            <td align="right">收货人姓名:</td>
                            <td width="47%" style="PADDING-LEFT: 12px"><%=trim(rs("userzhenshiname"))%></td>
                            <td width="38%" style="PADDING-LEFT: 12px"><a href="help.asp?action=feiyong" >查看送货费用说明</a></td>
                          </tr>
                          <tr bgcolor="#FFFFFF"> 
                            <td align="right">收货地址:</td>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -