Jimdo网站怎么添加翻页效果？

来源：百度知道 编辑：UC知道 时间：2024/09/22 07:19:00
我目前使用的是Jimdo的网站。
可是我的内容越来越多了...在同一页的话会很麻烦
不知道怎么可以弄成翻下页的效果
如图片红圈所示..
代码怎么用？导航栏累积太多的话会很麻烦。

<% KL=0
strSQL="Select * From 数据表 Where 分类='" & LM & "' AND 类别='" & ZPLB & "' order by id desc" '数据表连接字符串
Set RS=Server.CreateObject("ADODB.Recordset")
RS.Open strSQL,conn,3,3
TP1=RS.RecordCount '检测总记录
IF TP1=0 THEN Response.End
XSS1=12 '每页记录条数，可以修改
RS.PageSize=XSS1 '每页记录条数，传递给记录集
ZYS1=RS.PageCount '总页数，记录集会计算出总页数
DQYS1=Request("FS1") '当前连接动作
Select Case DQYS1 '判断在哪一页
Case 1 Session("YE1")=1
Case 2 Session("YE1")=Session("YE1")+1
Case 3 Session("YE1")=Session("YE1")-1
Case 4 Session("YE1")=ZYS1
Case else Session("YE1")=1
End Select
IF Session("YE1")<1 THEN Session("