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

📄 previeworder.asp

📁 全新后台新闻编辑器 2.全新后台下载编辑器 3.增加图片友情链接管理功能 4.JMail在线发送邮件,支持在线导出Email 5.新增在后台网站配置中指定网站首页新闻条数 6.后台
💻 ASP
字号:
<!--#include file="inc/conn.asp" -->
<%
Name=session("UserName")
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")	'使用点券
Comane=request.form("Comane")
Fox=request.form("Fox")


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

<HTML>
<HEAD>
<TITLE>订单提交预览</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="wache" content="0791idc">
<link href="css/mt_style.css" rel="stylesheet" type="text/css">
<link href="css/style.css" rel="stylesheet" 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;收货人邮箱:<%=Recmail%><br>
              &nbsp;&nbsp;&nbsp; 公司名称:<%=Comane%><br>
              &nbsp;&nbsp;&nbsp;&nbsp;联系传真:<%=Fox%><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%>">
              <INPUT TYPE="hidden" name="Comane" value="<%=Comane%>">
              <INPUT TYPE="hidden" name="Fox" value="<%=Fox%>">
              </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("Product_Id")) )
     If Quatity <= 0 Then 
        Quatity = CInt( Session(rs("Product_Id")) )
        If Quatity <= 0 Then Quatity = 1
     End If
     Session(rs("Title")) = Quatity
     Sum = Sum + csng(rs("Price")) * Quatity
     Sum=FormatNumber(Sum,2) 
     session("sum")=sum
%> 
  <tr bgcolor="#FFFFFF"> 
    <td width="50%" height="20">&nbsp;<font color="B0266D"><%=rs("Title")%></font></td>
    <td width="10%">&nbsp;<font color="B0266D"><%=Quatity%></font></td>
    <td width="20%">&nbsp;<font color="B0266D"><%=FormatNumber(rs("Price"),2)%></font></td>
	<td width="20%">&nbsp;<font color="B0266D"><%=FormatNumber(csng(rs("Price"))*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>
</form></table>
</BODY>
</HTML>
<%
set conn=nothing
%>

⌨️ 快捷键说明

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