| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 430 人关注过本帖
标题:留言本分页不成功 请各位帮帮我
只看楼主 加入收藏
wobububu
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2005-10-31
收藏
 问题点数:0 回复次数:0 
留言本分页不成功 请各位帮帮我

<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("guestbook.mdb")
%>

<%
exec="select * from guestbook"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1

rs.PageSize=3
pagecount=rs.PageCount
page=int(request.QueryString ("page"))
if page<=0 then page=1
if request.QueryString("page")="" then page=1
rs.AbsolutePage=page
%>
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
</head>

<body bgcolor="#000000" text="#000000">
<div align="center">
<p><font color="#FFFFFF" size="+7">留 言 显 示</font> </p>
<p>&nbsp;</p><tr>
<td>&nbsp;
</td>
</tr>

<%do while not rs.eof and i>0 i=i-1 %>
<table width="450" border="1">
<tr>
<td width="402" bgcolor="#000033">
<div align="left"><font color="#FFFFFF">昵名:<%=rs("name")%></font></div>
</td>
</tr>
</table>
<table width="450" border="1" bordercolor="#FFFFCC" bgcolor="#000033">
<tr>
<td width="392" height="14"><font color="#CCCCCC">标题:<%=rs("subject")%></font></td>
</tr>
</table>
<table width="450" border="1" bgcolor="#000033">
<tr>
<td><font color="#FFFFFF">email:<%=rs("email")%></font></td>
</tr>
</table>
<table width="450" border="1" height="27" bgcolor="#000033">
<tr>
<td width="402" height="114" valign="top" style="word-break:break-all">
<p>l<font size="+2">\<font color="#FFFFFF">留言内容</font></font><font color="#FFFFFF">
:<%=rs("message")%></font></p>
<p>&nbsp;</p>
</td>
</tr>
</table>
<table width="450" border="1" bgcolor="#000033">
<tr>
<td height="34"><font color="#FFFFFF">留言时间:<%=rs("time")%></font></td>
</tr>
</table>
<p>&nbsp;</p>
<table width="450" border="1" bgcolor="#33FFFF">
<tr>
<td height="20"><font color="#000066">欢迎光临飞飞云宅 欢迎光临飞飞云宅 欢迎光临飞飞云</font></td>
</tr><%
rs.movenext
loop
%>
</table><%for i=1 to pagecount%>
<a href="DD.asp?page=<%=i%>"><%=i%></a><%next%>

<p>&nbsp;</p>
<p>&nbsp;</p>
</div>
</body>
</html>

搜索更多相关主题的帖子: 本分 留言 
2005-10-31 23:17
快速回复:留言本分页不成功 请各位帮帮我
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016816 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved