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

📄 buyok.asp

📁 购物系统时尚版.强大的后台文章编辑器的功能
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
dim key,toppath,dbpath
key="a2"
toppath=""
dbpath=""
%>
<!--#include file="db_conn.asp" -->
<!--#include file="my_lib/my_request.asp"-->
<!--#include file="my_lib/email.asp"-->
<%
Server.ScriptTimeout=999999
email=my_request("email",0)
cartbh=session("cartbh")
paymode=session("paymode")
songmode=session("songmode")
price=session("price")
money=session("money")
content=session("content")
sum=session("sum")

session.Contents.Remove("sum")
session.Contents.Remove("cartbh")
session.Contents.Remove("paymode")
session.Contents.Remove("songmode")
session.Contents.Remove("price")
session.Contents.Remove("money")
session.Contents.Remove("content")

sql2="select server_name,login_name,login_pass,sender,sender_mail,content3,flag3 from email_system"
set rs2=conn.execute (sql2)
fwq=rs2(0)
passname=rs2(1)
password=rs2(2)
fa=rs2(3)
faemail=rs2(4)
txt=rs2(5)
flag3=rs2(6)
rs2.close
set rs2=nothing
if flag3=1 then
title="恭喜您,网上下单成功!"
hjf=3
Call SendAction (title,fwq,email,fa,txt,faemail,hjf,passname,password)
end if
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/main.css" rel="stylesheet" type="text/css">
<title>商品购买成功-交易结果</title>
</head>

<body topmargin="0">
<!--#include file="top.asp"-->

<div align="center">
	<table border="1" width="760" id="table1" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#F47E36">
		<tr>
			<td valign="top">
			<table border="0" width="100%" id="table2" cellspacing="0" cellpadding="0">
				<tr>
					<td bgcolor="#F7941D" height="25" style="border-top: 3px solid #D58000">商品购买成功</td>
				</tr>
				<tr>
					<td valign="top">
					<table border="0" width="100%" id="table3" cellspacing="0" cellpadding="0">
						<tr>
							<td height="18">⊙请牢记您的订单号:<input type=text value=<%=cartbh%> name=k1 onclick="this.select();js=this.createTextRange();js.execCommand('Copy');alert('复制成功');" onmouseover=this.select(); style="color: #FF0000" size="20">
							<u><font color="#FF0000">单击左框复制到粘贴板</font></u></td>
						</tr>
						<tr>
							<td height="18">⊙订单递交成功</td>
						</tr>
						<tr>
							<td height="18">
							⊙我们将按您的联系方式与您联系并按您的订单发货,请用笔记下您的订单号,以便查询。</td>
						</tr>
						<tr>
							<td height="18">⊙您选择的付款方式:<%=paymode%></td>
						</tr>
						<tr>
							<td height="18">⊙您选择的送货方式:<%=songmode%></td>
						</tr>
						<tr>
							<td height="18">⊙送货费用:¥<%=price%>元</td>
						</tr>
						<tr>
							<td height="18">⊙商品费用:¥<%=sum%>元</td>
						</tr>
						<tr>
							<td height="18">⊙一共费用:¥<%=money%>元</td>
						</tr>
						<tr>
							<td height="18">⊙备注说明:</td>
						</tr>
						<tr>
							<td height="18">&nbsp;&nbsp;&nbsp; <%=content%></td>
						</tr>
						<tr>
							<td height="18">
							<p align="center">
							<input type="button" value="关闭窗口" name="B3" onclick="javascript:window.close()">&nbsp;
							<input type="button" value="返回首页" name="B4" onclick="window.location='index.asp'" onFocus="this.blur()"></td>
						</tr>
						<tr>
							<td>
							 </td>
						</tr>
					</table>
					</td>
				</tr>
				</table>
			</td>
		</tr>
	</table>
</div>
<!--#include file="end.asp" -->
</body>

</html>

⌨️ 快捷键说明

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