<!--=================================鿴Աʼ=================================-->
	<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td><table width="270" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td height="28" bgcolor="#FFFFFF"><div id="gbookte">
            
              <li><a href="gbook.asp">ǩд</a></li><li><a href="gbooka.asp">鿴</a></li></div></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td><%
dim rs,sql
dim page,maxPerPage
maxPerPage=6 'ÿҳʾļ¼
page=Request("page")
if (page="" or isempty(page)) then page=1
thisUrl="gbooka.asp?true=1"
sql="select * from guestbook where check=true order by id desc"
set rs=server.createObject("adodb.recordset")
rs.open sql,conn,1,1
rs.pagesize=MaxPerPage
%>
<script language=Javascript>
<!--
function jumpTo(i){
if(i==1){
	this.document.location="<%=thisUrl%>";}
if(i==2){
	this.document.location="<%=thisUrl%>&page=<%=page-1%>";}
if(i==3){
	this.document.location="<%=thisUrl%>&page=<%=page+1%>";}
if(i==4){
	this.document.location="<%=thisUrl%>&page=<%=rs.pageCount%>";}
}
//-->
</script>
			<table width="98%" border="0" align="center" cellpadding="0" cellspacing="2">
              <tr>
                <td>
				<%
i=1
if not (rs.eof or err) then rs.move (page-1)*maxPerPage
do while not (rs.eof or err)
%>
				<table width="100%" border="0" align="center" cellpadding="6" cellspacing="1" bgcolor="#D4D0C8">
                  <tr>
                    <td width="12%" bgcolor="#FFFFFF" class="STYLE2"><div align="center"> </div></td>
                    <td width="88%" bgcolor="#FFFFFF"><%=rs("userName")%>&nbsp;&nbsp;<%=rs("createDate")%></td>
                  </tr>
				 
                  	 
                  <tr>
                    <td bgcolor="#FFFFFF" class="STYLE2"><div align="center"> </div></td>
                    <td bgcolor="#FFFFFF"><%=rs("title")%></td>
                  </tr>
                  <tr>
                    <td bgcolor="#FFFFFF" class="STYLE2"><div align="center"> </div></td>
                    <td bgcolor="#FFFFFF"><%=rs("content")%></td>
                  </tr>
				  <%
revert=rs("revert")
if revert<>"" then
%>
                  <tr>
                    <td bgcolor="#FF0000"><div align="center"> </div></td>
                    <td bgcolor="#FFFFFF"><span class="red"><%=revert%></span></td>
                  </tr>
				   <%end if %>
                </table>
				<table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="3"></td>
  </tr>
  <tr>
    <td height="1" background="images/nn.gif"></td>
  </tr>
   <tr>
    <td height="3"></td>
  </tr>
</table>
 <%
	i=i+1
	if i>maxPerPage then exit do
	rs.moveNext
loop
%>
				</td>
              </tr>
              <tr>
                <td><div align="right"> <%=rs.recordCount%> <%=page%>/<%=rs.pageCount%> 
              ҳ 
              <%if page>1 then%>
              <input type="button" name="Submit3" value="ҳ" onClick="Javascript:jumpTo(1)" style="font-size: 9pt; ">
              <input type="submit" name="Submit4" value="ҳ" onClick="Javascript:jumpTo(2)" style="font-size: 9pt; ">
              <%else%>
              <input type="button" name="Submit32" value="ҳ" style="font-size: 9pt; " disabled>
              <input type="submit" name="Submit4" value="ҳ" style="font-size: 9pt; " disabled>
              <%end if
if rs.recordCount>page*maxPerPage then%>
              <input type="submit" name="Submit5" value="ҳ" onClick="Javascript:jumpTo(3)" style="font-size: 9pt; ">
              <input type="submit" name="Submit6" value="ĩҳ" onClick="Javascript:jumpTo(4)" style="font-size: 9pt; ">
              <%else%>
              <input type="submit" name="Submit5" value="ҳ" style="font-size: 9pt; " disabled>
              <input type="submit" name="Submit6" value="ĩҳ" style="font-size: 9pt; " disabled>
              <%end if%>&nbsp;&nbsp;&nbsp;
            </div></td>
              </tr>
            </table></td>
      </tr>
    </table>
	<%
    rs.Close
    Set rs = Nothing
%>
	<!--=================================鿴Ա=================================-->