上一篇我做了一个简单的无刷新的留言功能,接下来这一篇,我做了一个简单实用的asp ajax的分页例子,我学习的代码如下:  function.asp:      <script language="javascript" type="text/javascript">   function pagesort(page)     {          var url='page.asp';       var pars='page='+page;    var LoadZone = document.createElement('div');    LoadZone.setAttribute('id', 'Load');    LoadZone.innerHTML = "Loading......";    $('pagecontent').appendChild(LoadZone);       var myAjax=new Ajax.Request(       url,       {        method:'get',        parameters:pars,        onComplete:showResponse    });            function showResponse(XmlHttpRequest)      {           $('pagecontent').innerHTML=XmlHttpRequest.responseText;    //$('Load').innerHTML="";            }             } </script>  <div id="pagecontent">    </div>    page.asp:  <!--#include file="../ajaxed.asp"--><% dim currentpage,page_count,pcount dim totalrec,endpage,action action="reply" currentpage=request.QueryString("page") if currentpage="" or not IsNumeric(currentpage) then    currentpage=1 else     currentpage=clng(currentpage) if err then    currentpage=1    err.clear end if      end if    db.open(AJAXED_CONNSTRING)   set rs=Server.CreateObject("ADODB.Recordset")  rs.open "select * from [messbook]",db.connection,1,1  if RS.BOF and RS.EOF then    response.Write("No message left!") else    RS.pagesize=6 rs.AbsolutePage = currentpage totalrec=RS.recordcount do while (not RS.EOF) and (not page_count = 6 )   ip=RS("ip")     ip=split(ip,".")     uip=ip(0)&"."&ip(1)&"."&ip(2)&".*"      response.Write("<div id=""content"">")     response.Write("<ul>")     response.Write("<li><a href="&RS("site")&" target=""_blank"">"&RS("name")&"</a>(ip:"&uip&") Says:<span id=""showtime"">"&RS("posttime")&"</span></li>")     response.Write("<li><span id=""cent"">"&RS("content")&"</span></li>")     response.Write("</ul>")      response.Write("</div>")      page_count=page_count+1    RS.movenext() loop  pcount=rs.pagecount   end if    response.Write("<div id=""page"">Pages:")     if currentpage > 4 then  response.write "<a href=""javascript:pagesort(1)"">1</a>  &laquo;" end if if pcount > currentpage + 3 then    endpage=currentpage + 3  else    endpage=pcount    end if   for i=currentpage-3 to endpage if not i<1 then     if i = clng(currentpage) then   response.write " <strong>["&i&"]</strong>"  else   response.write " <a href=""javascript:pagesort("&i&")"">"&i&"</a>"  end if end if next if currentpage+3 < Pcount then  response.write "  &raquo;  <a href=""javascript:pagesort("&Pcount&")"">"&Pcount&"</a>" end if  response.Write("</div>")  %> Enjoy!     

评论