<% if not isempty(request("page")) then page=cint(request("page")) else page=1 end if set rs=server.createobject("adodb.recordset") %> 留言管理 <% rs.close sql="select * from message where hf_content is not null order by ms_Id desc" rs.open sql,conn,1,1 RS.PageSize=2 if page<=0 then page=1 if page>=rs.pagecount then page=Rs.pagecount if not(RS.bof or RS.eof) then RS.AbsolutePage=page i=0 %>
留言总数:<%=(Rs.RecordCount)%> | 当前页:<%=page%>/<%=Rs.pagecount%> |
 
留言者信息
 留言内容
<% do while not rs.eof %>
<%=rs("ms_UserName")%>
<%=rs("ms_title")%>
回复： <%=rs("hf_content")%>
留言于： <%=rs("inputdate")%>
<% i=i+1 Rs.movenext if i>=Rs.PageSize then exit do loop %>
更多留言>>>
访客留言  

您的姓名：

  *
您的公司：
您的邮箱：
联系方式：
留言标题：
  *
留言内容：
  *
　 　　　
<% rs.close set rs=nothing conn.close set conn=nothing %>