那位高手可以帮我加入下一页代码

来源：百度知道编辑：UC知道时间：2024/05/16 20:25:00

<%dim newsid
newsid=SafeRequest("id",1)
set rs=server.CreateObject("adodb.recordset")
if newsid="" then
rs.open "select top 1 newsid,newsname,newscontent,addname,adddate,viewnum from jzzx order by adddate desc",conn,1,3
else
rs.open "select * from jzzx where newsid="&newsid&"",conn,1,3
end if
rs("viewnum")=rs("viewnum")+1
rs.update
%>

<%rs.close
set rs=nothing
%>
我把代码全发上去,你看下.



<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>托福幼儿英语</title>
<style>

<

超链接就可以啊。

你给的代码不完整，因此，我也就没有办法在你的代码上完成你的要求，那我就给你制作"下一页"即分页的程序流程吧，学到方法更重要:

分页的思路:
1.定义一下RecordSet对象的PageSize即每页的记录数
2.定义一下RecordSet对象的absolutepage即定义当前为第几页
3.加一个记录记录数的变量,并递增
注意头两步顺序不能颠倒

具体如下:
ObjRs.open ………… '创建RecordSet对象
ObjRs.pagesize=3 '定义每页的记录数
ObjRs.absolutepage=Page '定义当前是第几页
i=0 '记录数记数器变量
do while not ObjRs.eof and i<ObjRs.pagesize
i=i+1
'相关操作
ObrRs.moveNext
loop

那位高手可以帮我加入下一页代码那位高手可以帮下我？那位英文高手可以帮我翻译下英文` 那位高手能帮我加入注释麻烦那位高手帮我改下时钟的代码那位高手帮我翻译下那位高手帮我看看这段代码那位高手帮我解释一下这代码? 那位高手帮我解读一下代码. 那位高手帮我解释一下这些VB代码啊.