📄 user_qr.asp
字号:
<!--#include file=conn1.asp-->
<!--#include file=usercookies.asp-->
<!--#include file="config.asp"-->
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=title%>-支付确认</title>
<link href="inc_style.css" rel="stylesheet" type="text/css">
</head>
<body topmargin="0" leftmargin="0" >
<!--#include file=usertop.asp-->
<div align="center">
<center>
<table border="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111" width="760" height="371">
<tr>
<td width="157" height="299" valign="top">
<!--#include file=userleft.asp--></td>
<td width="10" height="299" background="images/line_01.gif"> </td>
<td width="603" height="299" valign="top" align="center">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="97%" height="139">
<tr>
<td width="97%" colspan="4" bgcolor="#EEFAFF" background="images/zfqr.gif" height="25">
<span lang="en-us">--->></span><a href="user_zffs.asp">查看支付方式</a></td>
</tr>
<%
dim rs,sql,username,email,dianhua,name,zffs
username=request.cookies("cnmai")("username")
set rs = Server.CreateObject("ADODB.RecordSet")
sql="select name,email,dianhua from [user] where username='"&username&"'"
rs.open sql,conn,1,1
if rs.eof then
response.write "<br>"
response.write "<li>参数错误！"
response.end
end if
email=rs("email")
dianhua=rs("dianhua")
name=rs("name")
rs.close
%>
<form method="POST" action="user_qrchk.asp">
<tr>
<td width="7%" height="23" align="left">
</td>
<td width="14%" height="23" align="left">
<span lang="zh-cn">支付方式：</span></td>
<td width="30%" height="23" align="left">
<select size="1" name="zffs">
<option selected value="0">支付方式</option>
<option value="1">银行汇款</option>
<option value="2">邮局汇款</option>
</select></td>
<td width="36%" height="23" align="left">
</td>
</tr>
<tr>
<td width="7%" height="25" align="left">
</td>
<td width="14%" height="25" align="left">
定单号码：</td>
<td width="30%" height="25" align="left">
<input type="text" name="ddhm" size="23" maxlength="50"></td>
<td width="36%" height="25" align="left">
</td>
</tr>
<tr>
<td width="7%" height="25" align="left">
</td>
<td width="14%" height="25" align="left">
支付金额：</td>
<td width="30%" height="25" align="left">
<input type="text" name="cash" size="11" maxlength="10"> 元</td>
<td width="36%" height="25" align="left">
<font color="#FF0000">输入你支付或汇款的金额</font></td>
</tr>
<tr>
<td width="17%" height="25" align="left">
</td>
<td width="98%" height="25" align="left" colspan="3">
<span lang="zh-cn">支付留言：
<textarea rows="7" name="liuyan" cols="53"></textarea></span></td>
</tr>
<tr>
<td width="17%" height="25" align="left">
</td>
<td width="62%" height="25" align="left" colspan="2">
<p align="center"><input type="submit" value="提交" name="B1"></td>
<td width="36%" height="25" align="left">
</td>
</tr>
</form>
<tr>
<td width="97%" height="37" colspan="4">
说明：如果你通过<font color="#FF0000">汇款</font>购买了虚拟货币<span lang="zh-cn">或本站广告服务</span>，可以在这里给管理员提醒你已经汇款，
并在留言中注明购买欲购买的服务，我们将尽快给你增加虚拟货币或提供相关服务，定单号码为：支付或汇款成功后的
<font color="#FF0000">定单号</font> 或 <font color="#FF0000">汇款凭证</font>
号码</td>
</tr>
<tr>
<td width="97%" height="25" colspan="4" background="images/lsjl.gif">
</td>
</tr>
<tr>
<td width="97%" height="68" colspan="4">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="100%">
<tr>
<td width="17%" align="center"><font color="#999999"><b>支付方式</b></font></td>
<td width="25%" align="center"><font color="#999999"><b>定单号码</b></font></td>
<td width="16%" align="center"><font color="#999999"><b>支付金额</b></font></td>
<td width="22%" align="center"><font color="#999999"><b>提交时间</b></font></td>
<td width="7%" align="center"><font color="#999999"><b>状态</b></font></td>
</tr>
<%
sql="select * from [dingdan] where username='"&username&"'"
rs.open sql,conn,1,1
if rs.eof then
response.write "<tr><td><li>没有历史记录</td></tr>"
else
do while not rs.eof
%>
<tr>
<td width="17%" align="center">
<%
zffs=rs("zffs")
if zffs=1 then
response.write "银行汇款"
elseif zffs=2 then
response.write "邮局汇款"
end if
%>
</td>
<td width="25%" align="center"><%=rs("ddhm")%></td>
<td width="16%" align="center"><%=rs("cash")%> 元</td>
<td width="22%" align="center"><%=rs("data")%></td>
<td width="7%" align="center">
<%if rs("admincl")=1 then%><font color="#0000FF">√</font><%else%><font color="#FF0000">ⅹ</font><%end if%>
</td>
</tr>
<tr>
<td width="97%" height="20" colspan="5" bgcolor="#FFFFFF">
<%=rs("liuyan")%></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
</td>
</tr>
<tr>
<td width="97%" height="25" colspan="4">
<p align="center"><font color="#0000FF">说明：√代表管理员已经处理过，</font><font color="#FF0000">ⅹ代表正在等待管理员处理</font></td>
</tr>
</table>
</td>
<td width="8" height="299" background="images/line_01.gif"> </td>
</tr>
<tr>
<td width="778" height="26" colspan="4"><!--#include file=end.htm--></td>
</tr>
</table>
</center>
</div>
</body>
</html>
<%
rs.close
set rs=nothing
closedb
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -