我写的长文章分页!有些问题!帮忙解决!着急!在线
<%
dim sdate,szongshu,syeshu,n,szishu,dwe
sdate=rss("内容")‘ 取出数据库字段内容
n=1
szishu=300 '页面上显示的字数
szongshu=len(sdate) '要显示的字段总长度
syeshu=int(szongshu/szishu+1)'分页页数
%>
<%
wewe=szishu*n ’第n页有说少字
if wewe=szishu then ’如果第1页的字数等于要显示的数字
seret =left(sdate,szishu) ,从左边取300个
else
if wewe>szishu then ’如果第n页的字大于要显示的数字
sedate =left(sdate,wewe) ‘从左边取第N页的字
seret=right(sedate,szishu) ,在从前面的值的右边取300个子!
end if
end if %>
<%=seret%> ’显示出要的分页文字
-----------
<%
if n=1 then
response.write ""
else
response.write "<a href='rzbm_xx_temp.asp>首页</a> <a href='rzbm_xx_temp.asp?n="&n-1&"'>上一页</a> "
end if
if n=syeshu then
response.write ""
else
response.write "<a href='rzbm_xx_temp.asp?n="&n+1&"'>下一页</a> <a href='rzbm_xx_temp.asp?dwe="&n&"'>尾页</a>"
end if
%>
-----------------
我的问题是:
如何在点上一页和下一页的时候。通过传递n 如(N+1)或(N-1)的值改变程序中N=1的值!