求助！急！谁能帮我看一下，下面的代码有什么问题。谢谢

<div id="content">
    <div id="stream" class="message"><h3><%=username%>在说…</h3><ol>
   <%
     dim Ble_user,i
     set rs = server.CreateObject(G_KW_RS)
     sql = "select * from Ble_topic where userid="&uid&" order by id desc"
     rs.open sql,conn,1,1
       
  page=Clng(request("page"))
     rs.pagesize=15
     if page<1 then page=1
     if page>rs.pagecount then page=rs.pagecount
     rs.Absolutepage=page
   
        for i=1 to rs.pagesize
      %>
   <li><span class="content"><%=rs("content")%></span><span class="stamp"><%=rs("updatetime")%></a></span></li>
   <%
     Rs.MoveNext
     if rs.eof then exit for
        next
   %>
   </ol>
   <br>
   <ol>
   <%
   if page<>1 then
        response.write "<a href=info.asp?uid="&uid&"&page=1>首页</a> "
        response.write "<a href=info.asp?uid="&uid&"&page="&(page-1)&">上一页</a> "
      end if
      if page<>rs.pagecount then
        response.write "<a href=info.asp?uid="&uid&"&page="&(page+1)&">下一页</a> " 
        response.write "<a href=info.asp?uid="&uid&"&page="&rs.pagecount&">尾页</a> "
      end if
      %> 第<%=page%>页/共有<%=rs.pagecount%>页
      </ol>
    </div>
  </div>
  </div>
  <div id="sidebar">
    <div class="sect vcard">
      <h2>姓名：<span class="fn"><%=username%></span></h2>
     <p class="iconset">注册：<%=regtime%>

<ul id="infos"><li>签名：<%=htmlencodeBle(content)%></li>
   </ul>
  </div>
</div>
<!--#include file="foot.asp"-->

 

如果找出问题请留言修正，谢谢了。非常感谢。