esmsg1.asp

短信客户端

<!--#include file="top.asp"-->
<%usertopview%>
    <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="left" valign=top>
<!--==============-->
<table width="500" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td height=25>您现在的位置是：管理中心 > 管理首页</td></tr>
  <tr>
    <td>
<!--####################################-->
	</td>
  </tr>
</table>
          <table width="95%" style="border:1px #cccccc solid;">
            <tr>
		<td>
<div align="center">
                  <table width="565" cellpadding="0" cellspacing="0" bordercolorlight="#CCCCCC" bordercolordark="#FFFFFF">
                    <form name="from1" method="post" action="mt.asp?word=<%=request("word")%>">
                      <tr align=center bgcolor=#efefef height=25> 
                        <%
sql="select *  from es_msg where msg_id="&session("id")&" order by msg_date desc"
'sql="select *  from es_msg where msg_type=1  order by msg_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="30" height=25>编号</td>
                        <td width="73" height="25">短信分类</td>
                        <td width="43" height="25">浏览</td>
                        <td width="313" height="25"> <p align="left">信息内容</td>
                        <td width="53">&nbsp;</td><td width="51">&nbsp;</td>
                      </tr>
                      <%do while not rs.eof and i<listnum
n=n+1
page=request("page")
if page="" then page=1
%>
                      <tr align=center height=22> 
                        <td><%=n%></td>
                        <%
if rs("msg_sort")=0 then
user="未分类"
else
set rs1=server.createobject("adodb.recordset")
sql1="select * from es_msgsort where id="&rs("msg_sort")
'sql1="select * from es_msgsort "
rs1.open sql1,conn,1,1
sort=rs1("es_msgsort")
rs1.close
end if%>
                        <td align="left"><font color="#0000FF"><%=sort%></font></td>
                        <td align="left" width="43"><font color="#FF0000"><%=rs("msg_hit")%></font></td>
                        <td align="left"> 
                          <%if rs("msg_type")=0 then%>
                          <font color="#666666">&nbsp;<%=rs("msg_info")%></font> 
                          <%else%>
                          &nbsp;<%=rs("msg_info")%> 
                          <%end if%>
                        </td>
                        <td width="53"><a href=smsmt.asp?msg=<% =rs("msg_info")%>>发送</a></td><td  width="51"> <a href=sms.asp?msg=<% =rs("msg_info")%>>群发</a></td>
                       
                      </tr>
                      <%rs.movenext 
i=i+1 
j=j-1
loop%>
                      <tr> 
                        <%filename="esmsg.asp?word="&request("word")&""%>
                        <td colspan=6 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>