| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 533 人关注过本帖
标题:[求助]关于分页,找人分个页
取消只看楼主 加入收藏
林新程
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2007-8-26
收藏
 问题点数:0 回复次数:2 
[求助]关于分页,找人分个页

学着分了好多次都出错误,看论坛看得头都大了也分不出来,求大家帮我做下分页显示的代码,谢谢!

<!--#include file="conn.asp" -->
<html>
<title>管理界面</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#C0C0C0" text="#000000" topmargin="20" class="title">

<table border=1 align=center cellspacing=0 cellpadding=2 id="table1">
<%
dim sql
dim rs
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Server.MapPath("wangba.mdb")
Conn.Open
set rs=server.createobject("adodb.recordset")
sql="select * from wangba order by address desc"
rs.Open sql,conn,1,1
if rs.EOF or rs.BOF then
Response.Write "<P>数据库中暂无资料!"
else
%>

<A HREF="add.asp">新添加</A>
<hr>
<tr>
<td width="60" height="28" bordercolorlight="#000000" bordercolor="#000000"><div align="center">区域

</div></td>
<td width="120" bordercolorlight="#000000" bordercolor="#000000"><div align="center">名字</div></td>
<td width="62" bordercolorlight="#000000" bordercolor="#000000"><div align="center">联系人</div></td>

<td width="90" bordercolorlight="#000000" bordercolor="#000000"><div align="center">电话</div></td>

<td width="254" bordercolorlight="#000000" bordercolor="#000000"><div align="center">地址</div></td>

<td width="36" bordercolorlight="#000000" bordercolor="#000000"><div align="center">编辑</div></td>
<td width="38" bordercolorlight="#000000" bordercolor="#000000"><div align="center">删除</div></td>
</tr>
<%
do while not rs.EOF
area=rs("area")
name=rs("name")
caller=rs("caller")
phone=rs("phone")
address=rs("address")
%>

<tr>
<td width="60" height="20" bordercolorlight="#000000" bordercolor="#000000"><div align="center"><%=area%

></a></div></td>
<td width="120" bordercolorlight="#000000" bordercolor="#000000"><div align="center"><a href="view.asp?

name=<%=name%>"><%=name%></div></td>
<td width="62" bordercolorlight="#000000" bordercolor="#000000"><div align="center"><%=caller%

></div></td>
<td width="90" bordercolorlight="#000000" bordercolor="#000000"><div align="center"><%=phone%></div></td>


<td width="254" bordercolorlight="#000000" bordercolor="#000000"><div align="center"><%=address%

></div></td>
<td width="36" bordercolorlight="#000000" bordercolor="#000000"><div align="center"><a href="modify.asp?

name=<%=name%>">编辑</a></div></td>
<td width="38" bordercolorlight="#000000" bordercolor="#000000"><div align="center"><a href="delnew.asp?

name=<%=name%>">删除</a></div></td>
</tr>
<% rs.MoveNext
loop
end if
rs.Close
set rs=nothing
conn.Close
set conn=nothing
%>
</td></table>
</body>
</html>
<%end if%>

搜索更多相关主题的帖子: content include border center title 
2007-08-29 13:57
林新程
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2007-8-26
收藏
得分:0 
以下是引用multiple1902在2007-8-29 14:25:44的发言:
见论坛置顶贴

什么意思啊?我看了很久的论坛了,可是自己就是弄不出来,不分页显示很正确,但一分错!

2007-08-29 14:40
林新程
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2007-8-26
收藏
得分:0 
看了,但实际中还是不会添加到自己的程序
2007-08-29 15:25
快速回复:[求助]关于分页,找人分个页
数据加载中...
 
   



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

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