📄 agent_index.asp
字号:
<!--#include file="chklogin.asp"-->
<%
call myobj.chkrq()
set rs=server.createobject("adodb.recordset")
rs.open "select * from setup where id=1",conn,1,1
website_name=rs("website_name")
rs.close
set rs=server.createobject("adodb.recordset")
rs.open "select * from agents where agent_id='"&request.cookies("username")&"'",conn,1,1
agent_id=rs("agent_id")
agent_money=rs("agent_money")
agent_money2=rs("agent_money2")
agent_from=rs("agent_from")
reg_time=rs("reg_time")
agent_name=rs("agent_name")
agent_tel=rs("agent_tel")
agent_qq=rs("agent_qq")
agent_msn=rs("agent_msn")
agent_email=rs("agent_email")
rs.close
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=website_name%>-代理商管理中心首页</title>
<link href="style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body,td,th {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 12px;
color: #000000;
}
a:link {
color: #0000FF;
text-decoration: none;
}
a:visited {
color: #0000FF;
text-decoration: none;
}
a:hover {
color: #FF0000;
text-decoration: underline;
}
a:active {
text-decoration: none;
}
-->
</style></head>
<body leftMargin="0" topMargin="0" bgcolor="#FFFFFF">
<table width="500" height="50" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center">[<span class="font3">管理中心首页</span>] [<a href="edit.asp">修改资料</a>] [<a href="cz.asp">账号充值</a>] [<a href="cz_log.asp">充值记录</a>] [<a href="login.asp?action=logout">注销登陆</a>]</td>
</tr>
</table>
<table width="550" height="25" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#3975CE">
<tr>
<td align="center" class="font1"><strong>来自管理员的代理商公告</strong></td>
</tr>
</table>
<table width="550" height="140" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E7E7E7">
<tr>
<td align="center" bgcolor="#FFFFFF"><table width="500" border="0" cellspacing="0" cellpadding="0">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from affiche where a_type=2 order by on_top desc,a_time desc",conn,1,1
if rs.eof and rs.bof then
response.Write "管理员暂时还没有发布代理商公告"
else
i=0
do while not rs.eof
i=i+1
%>
<tr>
<td width="20" height="20" align="left"><img src="images/announcement.gif" width="20" height="16"></td>
<td align="left"><a href="affiche_view.asp?id=<%=rs("id")%>" target="_blank"><%=rs("a_title")%></a></td>
<td align="right">
[<%=formatdatetime(rs("a_time"),2)%>]</td>
<td align="right"><%if rs("on_top")=true then%>
<img src="images/ontop.gif" alt="置顶公告" width="20" height="20"> <%end if%>
<%if DateDiff("d",rs("a_time"),Now)<=3 and rs("on_top")<>true then%>
<img src="images/new.gif" alt="最近三天发布的公告" width="20" height="20"> <%end if%></td>
</tr>
<%
if i>=5 then exit do
rs.movenext
loop
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</table>
<table width="500" height="25" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center"><a href="affiche_more.asp">更多代理商公告...</a></td>
</tr>
</table></td>
</tr>
</table>
<table width="550" height="25" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#3975CE">
<tr>
<td align="center" class="font1"><strong>代理商信息</strong></td>
</tr>
</table>
<table width="550" height="140" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E7E7E7">
<tr>
<td align="center" bgcolor="#F7F7F7"><table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25">代理商账号：<%=agent_id%></td>
</tr>
<tr>
<td height="25">剩余预付金：<%=agent_money%> 元</td>
</tr>
<tr>
<td height="25">可透支金额：<%=agent_money2%> 元</td>
</tr>
<tr>
<td height="25">注册时间：<%=reg_time%></td>
</tr>
<tr>
<td height="25">现在时间：<%=now()%></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -