毕业论文论文范文课程设计实践报告法律论文英语论文教学论文医学论文农学论文艺术论文行政论文管理论文计算机安全
您现在的位置: 毕业论文 >> 论文 >> 正文

asp留言本源码及论文 第7页

更新时间:2010-4-16:  来源:毕业论文
asp留言本源码及论文 第7页
 page=int(page)
     else
           page=1
     end if
     if not rs.eof  then
          size=7
    rs.PageSize=size           '每页记录数
          TotlePage=rs.PageCount     '总页数
        TotlePage=int(numzhuce/size)
    if (numzhuce mod size)>0 then TotlePage=TotlePage+1  '总页数
    if page<1 or page>TotlePage then
     page=1
     rs.AbsolutePage=page  '当前页
    else
        rs.AbsolutePage=page  '当前页
          end if
       num=1                    '循环变量初值
%>

以上的内容分别把接收到的数据放在变量中,下面的代码的功能是显示出这些信息。

<td width="545" height="91" valign="top">
     <font size="2">
       <%while not rs.eof and num<=size%>
       <font color="#FF00FF">
       [留言主题]</font><%=rs("主题")%><br>
    <font color="#FF00FF">
    [留言内容]</font><%=rs("内容")%><br>
    &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp &nbsp                                 
    <%=rs("昵称")%>&nbsp                              
    [<%=rs("时间")%>] <br>
    <font color="#0000FF">
    +---------------------------------------------------------------------+</font> <br>
    <%rs.movenext
            num=num+1
wend
rs.close
set rs=nothing%>
        </font>
       </td>
  </tr>
  <tr>
    <td width="545" height="91" valign="top">
<font size="2">
<a href="lyb.asp?page=1">[第一页]</a>
  <% select case page
     case 1:            '只有下一页
         if totlepage>1  then
%>
          <a href="lyb.asp?page=2">[下一页]</a>[第<%=page%>页/共<%=TotlePage%>页][共<%=numzhuce%>条记录]
          <% else %>
          第<%=page%>页/共<%=TotlePage%>页</font>
          <% end if %>
     <% case TotlePage:    '只有上一页%>
          <a href="lyb.asp?page=<%=page-1%>">[上一页]</a>[第<%=page%>页/共<%=TotlePage%>页][共<%=numzhuce%>条记录] 
      <% case else:  %>
          <a href="lyb.asp?page=<%=page-1%>">[上一页]</a>
          <a href="lyb.asp?page=<%=page+1%>">[下一页]</a>
          [第<%=page%>页/共<%=TotlePage%>页][共<%=numzhuce%>条记录] 
      <%  end select %>
</font>
<%end if%>
    </td>
此模块用到了RecordCount、request.querystring等方法以及一些翻页的技巧。由于篇幅限制,这里只给出了一部分比较重要的代码,其它的简略。4.2 用户留言及修改模块   该模块的功能是,用户可以在这里把自己的留言写在这里,如果其它用户浏览里,就可以看到此用户的留言(模块的缩略图如下3.2)。

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >> 

asp留言本源码及论文 第7页下载如图片无法显示或论文不完整,请联系qq752018766
设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©751com.cn 辣文论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。