主题:  高手帮忙,请帮我写下这个搜索结果的分页

醉卧孤云

职务:普通成员
等级:1
金币:0.0
发贴:20
注册:2004/6/23 12:39:13
#12004/8/27 18:54:16
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
dim renyuan,sql
renyuan=request("renyuan")
session("renyuan")=renyuan
sql="select * from ziliao where renyuan='"&renyuan&"'"
rs.open sql,db,1,3
%>
<%if rs.eof or rs.bof then
response.write "<font size=1pt>对不起没有搜索到记录</font>"
response.end
else
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>查看结果</title>
<link href="css.css" rel="stylesheet" type="text/css" />
</head>
<body>
<table width="302" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#FFFFFF" bordercolordark="#000000">
<tr align="center">
<td width="88" align="left"> 用户名</td>
<td width="208"><%=rs("name")%></td>
</tr>
<tr align="center">
<td align="left">  ADSL承载号码</td>
<td><%=rs("adsl")%></td>
</tr>
<tr align="center">
<td align="left"> 联系电话</td>
<td><%=rs("tel")%></td>
</tr>
<tr align="center">
<td align="left"> 装机地址</td>
<td><%=rs("add")%></td>
</tr>
<tr align="center">
<td align="left>"> 112派单时间</td>
<td><%=rs("shijian")%></td>
<tr align="center">
<td align="left"> 竣工时间</td>
<td><%=rs("shijian")%></td>
</tr>
<tr align="center">
<td align="left"> 安装人员</td>
<td><%=rs("renyuan")%></td>
</tr>
<tr align="center">
<td align="left"> 用户名</td>
<td><%=rs("yonghuming")%></td>
</tr>
<tr align="center">
<td align="left"> 密码</td>
<td><%=rs("mima")%></td>
</tr>
<tr align="center">
<td align="left"> 备注</td>
<td><%=rs("beizhu")%></td>
</tr>
<tr align="center">
<td rowspan="2">操作</td>
<td>删除改记录</td>
</tr>
<tr align="center">
<td></td>
</tr>
</table>
</body>
</html>
<%end if%>


一个页面只要一条记录,要显示公有几条(页)记录,而且有下一页等功能!

谢谢了!!!!!



缺缺

职务:管理员
等级:8
金币:41.0
发贴:9620
注册:2004/1/14 19:14:47
#22004/8/27 20:12:40
请不要直接索取代码