?? 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>0</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 + -