AJAX分页程序（上）——电影网站分页程序

<data ipage="<%=iPage%>" maxpage="<%=maxPage%>" pagenum="<%=pageNum%>" countnum="<%=countNum%>">

开篇语：
    咖啡做WEB程序已有三年，可是水平还是很菜，不敢同高手相比，所以也就没有写技术文章的习惯，今天心血来潮，借优快云的平台，给自己申请了一个专门用来写技术文章的BLOG（本人还有另一个BLOG，嘻嘻），用来记录一些我曾经写过和程序，与大家一同分享，共同进步。
    咖啡我第一次写技术文章，如果有不足的地方请大家指出，好了，费话少说，马上开始我们今天的内容。

    近日，咖啡对AJAX技术有点兴趣，和同事在三的说明，现一网站的电影版块由我利用AJAX技术来完成，在做到对电影分页的时个，咖啡遇到了好多问题，经过自己一天多的努力，所以的问题迎刃而解，今天就同大家一同分享一下利用AJAX技术实现分页的功能（在做开发之前，咖啡也在网上找过一些AJAX分页技术的代码，便最终还是行不通，也只好自己来写了！）。
    对于分页功能，我准备分二部分讲，第一部分是XML的生成，第二部分是利用JS读取XML。

一、XML的生成：
　　首先对分页程序进行分析：需要返回四个数值，分别为：总页数、当前页数、每页显示数和总记录数，然后分别将这四个数，进行禄始化。代码如下： 

    dim maxPage,iPage,pageNum,countNum    //总页数、当前页数、每页显示数、总记录数
    dim moveType            //电影类别

    //初始化数据    
    pageNum=10

    iPage=trim(request.QueryString("page"))
    if iPage="" then
        iPage=1
    else
        iPage=cint(iPage)
    end if
    if iPage<1 then
        iPage=1
    end if
    
    moveType=trim(request.QueryString("type"))
    if moveType<>"" then
        moveType="where lb=" & moveType
    end if

　　然后取得共有多少条记录，及总页数，代码如下：

    //得到记录数
    set sumRs=conn.execute("select count(*) from t_movie " & moveType)
    countNum=sumRs(0)
    sumRs.close
    
    //得到总页数
    maxPage=countNumpageNum
    if (countNum mod pageNum)<>0 then maxPage=maxPage+1

　　生成XML根节点及根节点的属性，其中根节点属性包括了总页数、当前页数、每页显示数和总记录数。

  <data ipage="<%=iPage%>" maxpage="<%=maxPage%>" pagenum="<%=pageNum%>" countnum="<%=countNum%>">

　　接下来是利用循环来生成所有电影节点，代码如下：

<%    //SQL语句
    m_sql="select * from t_Movie " & moveType

    while not moveRs.eof
        set rs=conn.execute("select classname from t_movieclass where id=" & moveRs("lb"))
        movicclass=rs("classname")
        rs.close    
        if movers("dj")-1=0 then
            lookteam="免费观看"
        else
            lookteam="VIP会员观看"
        end if
%>
    <item>
        <movieid><%=moveRs("id")%></movieid>
        <moviename><%=moveRs("mc")%></moviename>
        <tccd><%=startNum(moveRs("tccd"))%></tccd>
        <movieleng><%=moveRs("ypcd")%> 分钟</movieleng>
        <movieclass><%=movicclass%></movieclass>
        <lookteam><%=lookteam%></lookteam>
        <moviepic><%=moveRs("tpdz")%></moviepic>
    </item>
<%
    moveRs.movenext
    wend
%>

    到此XML文件生成完成，其中:
    <movieid>：表示电影ID
    <moviename>：表示电影名称
    <tccd>：表示推荐程度（分别是：1、2、3、4、5）
    <movieleng>：电影长度（单位是分钟）
    <movieclass>：电影所属类别
    <lookteam>：观看对象
    <moviepic>：电影图片