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

📄 paynext.asp

📁 一个不错的个人商务网站的源码
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%Response.Expires = -100%>
<!--#include file="db_conn.asp"-->
<!--#include file="comm/my_request.asp"-->
<!--#include file="comm/nosql.asp" -->
<!--#include file="comm/co.asp" -->
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=<%="style/"&r(22)%>.css rel=stylesheet type=text/css>
<title>商品信息及个人资料</title>
</head>

<body topmargin="1">
<%
ProductList = Session("ProductList")
If Len(ProductList) = 0 Then
response.write "<script language=javascript>alert('对不起,您的购物车为空!');location.href=""index.asp"";</script>"
response.End
end if
%>
<div align="center">
	<table border="1" width="100%" cellpadding="0" style="border-collapse: collapse" bordercolor="#CCCCCC" class="li_table">
		<tr>
			<td valign="top">
			<table border="0" width="100%" id="table2" cellspacing="0" cellpadding="0">
				<tr>
					<td height="20" colspan="4" class="maincolor">
					<p align="center">
					商品列表及个人资料</td>
				</tr>
				<tr>
					<td height="18" bgcolor="#EBEBEB" width="189">商品名称</td>
					<td height="18" bgcolor="#EBEBEB" width="189">单价</td>
					<td height="18" bgcolor="#EBEBEB" width="190">数量</td>
					<td height="18" bgcolor="#EBEBEB" width="190">金额</td>
				</tr>
				<%
set rs2=server.createobject("adodb.recordset")
sql2 = "Select * From yqj_product"
sql2 = sql2 & " Where id In (" & ProductList & ")"
rs2.open sql2,conn,3,3

   Sum = 0
     While Not rs2.EOF
if session("level")="" or isnull(session("level")) or session("level")=0 then
RMB=rs2("p_mmoney")
else
RMB=rs2("vip_mmoney")
end if 
	 Quatity = CInt( Request( "Q_" & rs2("p_name")) )
     If Quatity <= 0 Then 
        Quatity = CInt( Session(rs2("p_name")) )
        If Quatity <= 0 Then Quatity = 1
     End If
     Session(rs2("p_name")) = Quatity
     Sum = Sum + ccur(rmb) * Quatity
     %>
				<tr>
					<td height="18" width="189"><%=rs2("p_name")%></td>
					<td height="18" width="189">¥<%=FormatNumber(rmb,2,-1)%>元</td>
					<td height="18" width="190"><%=Quatity%><input name=<%response.write "Q_"&rs2("p_name")%> type="hidden" value=<%=Quatity%>></td>
					<td height="18" width="190">¥<%=FormatNumber((ccur(rmb)*Quatity),2,-1)%>元</td>
				</tr>
				<%
   rs2.MoveNext
   Wend
   rs2.close
   set rs2=nothing
   %>
				<tr>
					<td height="18" colspan="4">
					<p align="right">商品合计价格:¥<%=FormatNumber(sum,2,-1)%>元</td>
				</tr>
				<tr>
					<td colspan="4" valign="top">
<%
set rs=conn.execute ("select deliver_name,price from deliver where id="&my_request("songid",1))
deliver_name=rs("deliver_name")
price=rs("price")
rs.close
set rs=nothing
allnums=price+sum
%>
                    <form name=form1 action=setorder.asp method=post target=_blank>

					<table border="0" width="100%" id="table3" cellspacing="1">
						<tr>
							<td colspan="3" height="25" class="maincolor">
							<p align="center">个人资料填写</td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">真实姓名:</td>
							<td height="18" width="265"><%=my_request("yqj_realname",0)%><input type="hidden" name="yqj_realname" value=<%=my_request("yqj_realname",0)%>></td>
							<td height="18" width="526"><font color="#808080">* 
							必须填写,将是收货人姓名</font></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">联系地址:</td>
							<td height="18" width="265"><%=my_request("yqj_address",0)%><input type="hidden" name="yqj_address" value=<%=my_request("yqj_address",0)%>>
							</td>
							<td height="18" width="526"><font color="#808080">* 
							将是送货地址</font></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">邮政编码:</td>
							<td height="18" width="265"><%=my_request("yqj_postal",0)%><input type="hidden" name="yqj_postal" value=<%=my_request("yqj_postal",0)%>></td>
							<td height="18" width="526"><font color="#808080">* 
							将是送货邮政编码</font></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">联系电话:</td>
							<td height="18" width="265"><%=my_request("yqj_phone",0)%><input type="hidden" name="yqj_phone" value=<%=my_request("yqj_phone",0)%>></td>
							<td height="18" width="526"><font color="#808080">* 
							请如实填写,便与我们与您联系</font></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							手机号码:</td>
							<td height="18" width="265"><%=my_request("yqj_mobile",0)%><input type="hidden" name="yqj_mobile" value=<%=my_request("yqj_mobile",0)%>></td>
							<td height="18" width="526"></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">电子信箱:</td>
							<td height="18" width="265"><%=my_request("yqj_email",0)%><input type="hidden" name="yqj_email" value=<%=my_request("yqj_email",0)%>></td>
							<td height="18" width="526"><font color="#808080">* 
							请如实填写,便与我们与您联系</font></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">支付方式选择:</td>
							<td height="18" width="265"><%=my_request("paymode",0)%><input type=hidden name=paymode value=<%=my_request("paymode",0)%>></td>
							<td height="18" width="526"><font color="#808080">* 
							请选择</font></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right" bgcolor="#FF6600">
							<font color="#FFFFFF">总计价格:</font></td>
							<td height="18" width="265" bgcolor="#FF6600">
							<font color="#FFFFFF"><%=allnums%>(包括运费)</font></td>
							<td height="18" width="526" bgcolor="#FF6600"></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">送货方式选择:</td>
							<td height="18" width="265">
							<%=deliver_name%>(<%=FormatNumber(price,2,-1)%>元)<input type=hidden name=songid value=<%=my_request("songid",1)%>></td>
							<td height="18" width="526"><font color="#808080">* 
							请选择,不同的送货方式其费用不一样</font></td>
						</tr>
						<tr>
							<td height="18" width="183" align="right">
							<p align="right">备&nbsp;&nbsp;&nbsp; 注:</td>
							<td height="18" width="265"><%=my_request("content",0)%><input name=content type=hidden value=<%=my_request("content",0)%>></td>
							<td height="18" width="526"><font color="#808080">* 
							您的特殊需求</font></td>
						</tr>
						<tr>
							<td colspan="3" height="18">
							<p align="center">
							<input type=submit value="确认无误下单" name="B1" >&nbsp;
							<input type=button value="返回修改" name="B2" onclick="window.location='gathering.asp'" onFocus="this.blur()"></td>
						</tr>
						<tr>
							<td colspan="3" height="25"><font color="#FF0000">
							注意:以上信息,请认真如实填写,我们将以此给您发货。否则由此而造成的损失我们概不负责。</font></td>
						</tr>
					</table></form>
					</td>
				</tr>
			</table>
			</td>
		</tr>
	</table>
</div>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>

</html>

⌨️ 快捷键说明

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