📄 previeworder.asp

📁 广告策划中心整站程序
💻 ASP
字号:
<!--#include file="../Comm/subconn.asp" -->
<%
Name=session("estore_userid")
Recname=request.form("Recname")
Zipcode=request.form("ZipCode")
RecPhone=request.form("RecPhone")
Address=request.form("Address")
Recmail=request.form("Recmail")
paytype=request.form("paytype")
Notes=request.form("Notes")
Discount=request.form("Discount")	'使用点券

if reg<>"1" then
	'判断是否正常购买，如果不是，需要登陆
	if session("estore_userid")="" then 
	response.redirect "../error.asp?error=006"
	response.end
	end if
end if

'判断购物车是否为空
ProductList = Session("ProductList")
if productlist<>"" then
sql="select * from ProdMain where ProdId in ("&productlist&") order by ProdId"
Set rs = conn.Execute( sql )
else
response.redirect "../error.asp?error=007"
response.end
end if

%>


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>订单提交预览</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="Robots" content="index,follow">
<meta name="Abstract" content="CycooShop">
<meta name="DC.Publisher" content="Cycoo Net Studio">
<meta name="Description" Content="欢迎使用 CycooShop 专业的电子商务平台 下载地址 www.cycoo.com">
<meta name="Keywords" Content="思高商城 免费下载">
<link rel="stylesheet" href="../cycoo15.css" type="text/css">
</HEAD>

<BODY>
<table width=100% cellpadding=0 cellspacing=0><tr><td><form name=confirm action="ordersent.asp" method=post><%=name%> <br>&nbsp;&nbsp;您好！<br>&nbsp;&nbsp;以下是您的订单，如果没有问题请 <input type="submit" value="马上提交订单">，或者返回 <input type="button" name="Submit21" onclick="javascript:history.go(-1)" value="返回修改订单"><br><br>&nbsp;&nbsp;有任何疑问请及时和我们联系&nbsp;&nbsp;电话：<%=adm_tel%>&nbsp;邮件：<%=adm_mail%><br><br><br>
<input type=hidden value="ok" name="confirm">
<table border="0" cellspacing="1" cellpadding="0" align="center" width="520" bgcolor="B0266D">
<tr bgcolor="#FFFFFF"> 
  <td height="25" colspan=4>&nbsp;收货人信息</td></tr>
<tr bgcolor="#FFFFFF"> 
            <td height="25" colspan=4><font color="B0266D"> &nbsp;&nbsp;&nbsp;&nbsp;经办人姓名:<%=Recname%><br>
              &nbsp;&nbsp;&nbsp;&nbsp;经办人电话：<%=RecPhone%><br>
              &nbsp;&nbsp;&nbsp;&nbsp;经办人邮箱：<%=Recmail%><br>
              &nbsp;&nbsp;&nbsp;&nbsp;经办人地址：<%=address%><br>
              &nbsp;&nbsp;&nbsp;&nbsp;邮政编码：<%=Zipcode%><br>
              &nbsp;&nbsp;&nbsp;&nbsp;支付类型：<%=paytype%> <br>
              &nbsp;&nbsp;&nbsp;&nbsp;汇款账号： 
              <%
sqlp="select paytype,paymentmessage from paydefault where paytype='"&paytype&"'"
set rsp=server.createobject("ADODB.Recordset")
rsp.open sqlp,conn,1,1
response.write rsp("paymentmessage")
rsp.close
set rsp=nothing
%>
              <br>
              &nbsp;&nbsp;&nbsp;&nbsp;备注说明：<%=Notes%><br>
              <INPUT TYPE="hidden" name="RecName" value="<%=Recname%>">
              <INPUT TYPE="hidden" name="RecPhone" value="<%=RecPhone%>">
              <INPUT TYPE="hidden" name="RecAddress" value="<%=address%>">
              <INPUT TYPE="hidden" name="Recmail" value="<%=Recmail%>">
              <INPUT TYPE="hidden" name="Zipcode" value="<%=Zipcode%>">
              <INPUT TYPE="hidden" name="PayType" value="<%=paytype%>">
              <INPUT TYPE="hidden" name="Discount" value="<%=Discount%>">
              <INPUT TYPE="hidden" name="Notes" value="<%=Notes%>">
              </font></td>
    </tr>
  <tr bgcolor="#FFFFFF"> 
            <td width="50%" height="25" align="center"> <font color="B0266D">项目 名 称</font> 
            </td>
            <td width="10%" align="center"> <font color="B0266D">计划周期</font> </td>
            <td width="20%" align="center"> <font color="B0266D">设计报价</font> </td> 
	<td width="20%" align="center"> 
     <font color="B0266D">合 计</font>
    </td>
  </tr>
<%
   Sum = 0
   While Not rs.EOF
     Quatity = CInt( Request( "Q_" & rs("ProdId")) )
     If Quatity <= 0 Then 
        Quatity = CInt( Session(rs("ProdId")) )
        If Quatity <= 0 Then Quatity = 1
     End If
     Session(rs("ProdName")) = Quatity
     Sum = Sum + csng(rs("PriceList")) * Quatity
     Sum=FormatNumber(Sum,2) 
session("sum")=sum
%> 
  <tr bgcolor="#FFFFFF"> 
    <td width="50%" height="20">&nbsp;<font color="B0266D"><%=rs("ProdName")%></font></td>
    <td width="10%">&nbsp;<font color="B0266D"><%=Quatity%></font></td>
    <td width="20%">&nbsp;<font color="B0266D"><%=FormatNumber(rs("PriceList"),2)%></font></td>
	<td width="20%">&nbsp;<font color="B0266D"><%=FormatNumber(csng(rs("PriceList"))*Quatity,2)%></font></td>
  </tr>
<%
rs.MoveNext
Wend
rs.close
set rs=nothing
%> 
  <tr bgcolor="#FFFFFF"> 
    <td colspan="4" height="25" align="right"> 
      <b><font color="#B0266D">总价格=<%=Sum%></font>&nbsp;&nbsp;
    </td>
  </tr>
</table>
<br>
        <div align=center><font color="#333333">&copy; 2004-2005 <B><%=siteurl%></B> 
          <%=sitename%> 版权所有</font><br>
          <font color="#333333"> 程序美工设计：九江市大地广告策划中心</font></div>

</form></table>
</BODY>
</HTML>
<%
set conn=nothing
%>
⌨️ 快捷键说明

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