user.asp

本系统旨在帮助您快速建立自己的WEB短信平台

<!--#include file="top.asp"-->
<%usertopview%>
<%
user=session("useradmin")
%>
<table width="760" height="100%" border="0" align="center" cellPadding="0" cellSpacing="0" bgcolor="#ffffff">

<tr>
<td width="160" valign=top bgcolor=#efefef>
<!--==============-->
<!--#include file="left.asp"-->
<!--==============-->
</td>
<td width="600" align="center" valign=top>
<!--==============-->
<table width="600" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td height=25>您现在的位置是：管理中心 &gt; 推荐用户</td></tr>
  <tr>
    <td>
<!--####################################-->
	</td>
  </tr>
</table>
<table width="600" style="border:1px #cccccc solid;">
	<tr>
		<td>
		<div align="right">
<table width="100%" cellpadding="0" cellspacing="0" bordercolorlight="#CCCCCC" bordercolordark="#FFFFFF">
<form name="from1" method="post" action="user.asp?word=<%=request("word")%>">
<tr align=center bgcolor=#efefef>
<%sql="select *  from es_smsuser where es_tjid="&session("id")&" order by es_date desc"
set rs=server.createobject("adodb.recordset")                     
rs.open sql,conn,1,1                     
if rs.eof and rs.bof then                     
	response.write "暂无内容"
else  
'分页的实现 
listnum=10
Rs.pagesize=listnum
page=Request("page")
if (page-Rs.pagecount) > 0 then
page=Rs.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs.absolutepage=page
'编号的实现
j=rs.recordcount
j=j-(page-1)*listnum
i=0
nn=request("page")
if nn="" then
n=0
else
nn=nn-1
n=listnum*nn
end if%>
 <td width="28" height=22>编号</td>
 <td width="97" align="left">注册时间</td>
 <td width="45" align="left">余额</td>
 <td width="164" align="left">用户名</td>
 <td width="132" align="left">注册手机</td>
</tr>
<%do while not rs.eof and i<listnum
n=n+1
ksdate=cdate(year(rs("es_date"))&"-"&month(rs("es_date"))&"-"&day(rs("es_date")))
tian=ktdate-date()
ztian=ktdate-ksdate
page=request("page")
if page="" then page=1
%>
<tr align=center height=22>
 <td><%=n%></td>
 <td align=left width="97">&nbsp;<%=ksdate%></td>
 <td align=left width="45"><font color="#FF0000"><%=rs("es_pay")%></font></td>
 <td align="left">&nbsp;<%=rs("es_user")%></td>
 <td align="left">&nbsp;<%=rs("es_phone")%></td>
</tr>
<%rs.movenext 
i=i+1 
j=j-1
loop%>
<tr>
<%filename="user.asp?word="&request("word")&""%>
<td colspan=10 height=20 align=right bgcolor=#cccccc><%=Rs.recordcount%> 个用户&nbsp;&nbsp;<%=listnum%> 个
用户/页&nbsp;&nbsp;共 <%=Rs.pagecount%> 页 
      <% if page=1 then %>
      <%else%>
      <a href=<%=filename%>><strong>|<<</strong></a>&nbsp; 
      <a href=<%=filename%>&page=<%=page-1%>><strong><<</strong></a>&nbsp; 
      <a href=<%=filename%>&page=<%=page-1%>><b>[<%=page-1%>]</b></a>&nbsp; 
      <%end if%><% if Rs.pagecount=1 then %><%else%><b>[<%=page%>]</b><%end if%>
	  <% if Rs.pagecount-page <> 0 then %>
      <a href=<%=filename%>&page=<%=page+1%>><b>[<%=page+1%>]</b></a>&nbsp; 
      <a href=<%=filename%>&page=<%=page+1%>><strong>>></strong></a>&nbsp; 
      <a href=<%=filename%>&page=<%=Rs.pagecount%>><strong>>>|</strong></a>&nbsp; 
	  <%end if%>&nbsp;&nbsp;</td>
<%end if%></tr>
</form>
</table></div>
		</td>
	</tr>
</table>
<!--==============--></td>
</tr>
</table>
<!--====== bottom ========-->
<!--====== bottom ========-->
    <table width="100%" border="0" cellspacing="0" cellpadding="0" style="border:0px #cccccc solid;">
      <tr>
        <td width="30%" align="right" valign="middle"><img src="../images/index_04.gif" alt=""></td>
        <td width="70%" align="left"><%=citybottom%></td>
  </tr>
</table>
				  </body>
</html>