用dreamweaver做翻页

来源:百度知道 编辑:UC知道 时间:2024/05/17 17:14:47
在网络上常常看见那些小说点击下一页按钮就会弹到下一页了,每次看完一页只要按下一页就可以了,浏览起来非常方便,就是不知道怎么样才能用dreamweaver实现,因为要用到数据库,我看一般文字是说不太清楚的,如果哪位大哥会的话,留个言,加个qq,我的qq是375766053,要加我时,请注明,教教我,谢谢了!

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body>

<%
dim db
set db=server.CreateObject("ADODB.Connection")
db.open "dbq=" & server.mappath("db1.mdb") & ";Driver={microsoft access driver (*.mdb)}"
%>

<%
dim strsql,rs
strsql="Select * From new1 order by add_date"
set rs= Server.CreateObject("ADODB.Recordset")
rs.open strsql,db,1,1

dim page_size,page_no,page_total
page_size=8 '每页记录数
if request.queryString("page_no")="" then
page_no=1
else
page_no=cint(request.queryString("page_no"))
end if
rs.pagesize=page_size
page_total=rs.pagecount
rs.absolutepage=page_no
dim i
i=page_size
%>

<%do while n