📄 toagent.asp
字号:
<% if not session("sel") then
Response.redirect "usdl.asp"
end if
%>
<!--#include file="conn.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE><%=page_name%> – <%=page_title%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK
href="images/style.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
</HEAD>
<BODY leftMargin=0 background=images/bg.jpg topMargin=0 marginheight="0"
marginwidth="0">
<!--#include file="head.asp" -->
<TABLE height=288 cellSpacing=0 cellPadding=0 width=760 align=center
bgColor=#ffffff border=0>
<TBODY>
<TR>
<TD width=171 height=288 vAlign=top background="images/bg_l_n.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center"><img src="images/domain_image.gif" width="174" height="119"></div></td>
</tr>
<tr>
<td height="17" bgcolor="#EEEEEE"><div align="center">欢迎: <font color="#FF0000"><strong><%= session("us") %></strong></font> 光临</div></td>
</tr>
<tr>
<% us=session("us")
sql="select * from user where userid='"&us&"'"
rs.open sql,conn,1,1
af=rs("sf")
%>
<td><p>您的账面存款：</p>
<p align="center"><font color="#FF0000">￥ <%= rs("je") %></font></p>
<p align="center">客户等级: <font color="#FF0000"><%= rs("sf") %>
<% rs.close
ms=""
if Trim(Request.QueryString("w"))="save" then
ms="申请成功...请不要重复申请"
sql="select * from user where userid='"&session("us")&"'"
'sql="update user set dl='"&Trim(Request.Form("dl"))&"',dldat="&date()&" where userid='"&session("us")&"'"
rs.open sql,conn,2,3
rs("dl")=Trim(Request.Form("dl"))
rs("dldat")=date()
rs.update
rs.close
%>
<script language="VBScript" type="text/VBScript">
msgbox"你的代理意向已经发出,请不要重复提交"
</script>
<%
end if
%>
</font></p></td>
</tr>
<tr>
<td height="1" background="images/2.jpg"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center">
<!--#include file="user_inc.asp" -->
</div></td>
</tr>
<tr>
<td><p></td>
</tr>
<tr>
<td height="1" background="images/2.jpg"></td>
</tr>
</table></TD>
<td height="288" valign="top"><table width="573" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="573"><img src="images/mameger.gif" width="437" height="43"></td>
</tr>
<tr>
<td><%
rs.open "select * from user where userid='"&session("us")&"'and dlf=false",conn,1,1
if rs.eof then
Response.Write("您已经成为我们的代理了")
else
%>
<form name="form2" method="post" action="toagent.asp?w=save">
<table width="96%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="63%" valign="top"><p><font color="#FF0000"> 申请成我们的代理</font></p>
<p> 您选择的等级是:</p>
<p>
<input name="dl" type="radio" value="普通代理" checked>
普通代理 </p>
<p>
<input type="radio" name="dl" value="高级代理">
高级代理 </p>
<p align="center">
<input type="submit" name="Submit2" value="-发出请求-">
</p>
<p> 目前我人只提供两个级别的代理</p>
<table width="95%" height="74" border="0" align="center" cellpadding="0" cellspacing="0">
<tr bgcolor="#F3F3F3">
<td width="29%" height="18"><div align="center"><strong>代理级别</strong></div></td>
<td width="35%"><div align="center"><strong>预交金额</strong></div></td>
<td width="36%"><div align="center"><strong>服务</strong></div></td>
</tr>
<tr>
<td>一般用户</td>
<td><div align="center"><font color="#FF0000">￥</font>０</div></td>
<td><div align="center">直接价</div></td>
</tr>
<tr>
<td>普通代理 </td>
<td><div align="center"><font color="#FF0000">￥</font>500</div></td>
<td><div align="center">代理价</div></td>
</tr>
<tr>
<td>商级代理 </td>
<td><div align="center"><font color="#FF0000">￥</font>1000</div></td>
<td><div align="center">代理价</div></td>
</tr>
</table>
<p><font color="#FF0000"> 关于代理的价格请向我们咨询 <a href="mailto:<%=page_email%>"><%=page_email%></a></font></p></td>
<td width="37%"><div align="center"><img src="images/newagent4.gif" width="177" height="213"></div></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
</table>
</form>
<%
end if %></td>
</tr>
</table>
<p><font color="#0099FF"> 有关代理的说明请点这里 <a href="agent.asp">>>></a></font></p>
<p align="center"><font color="#FF0000"><%= ms %></font></p>
<p align="center"> </p>
<p align="center"></p></td>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
<TBODY>
<TR>
<TD bgColor=#999999><IMG height=1 src="images/spacer.gif"
width=1></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="foot.asp" -->
<%conn.close
set conn= nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -