一个文本框(word)和一个下拉菜单(op)将查询后的信息分页显示,第一页是正常的,点击"下一页"时就脱离分页范围回到总共的信息了.我在网上查了一下,最可能的原因就时翻页代码里没有加上搜索条件,由于这个代码不是我本人写的,想学习学习.所以请各位大侠们帮我看看应该怎么改? 谢谢了.....
function prenextlistPages(totalrecordcount,currentpage,msg_per_page,Condition)
if totalrecordcount mod msg_per_page = 0 then '计算总页数,recordcount:数据的总记录数
totalpage = totalrecordcount\msg_per_page 'n:总页数
else
totalpage = totalrecordcount\msg_per_page+1
end if
firstpage_text="首页"
prepage_text="上一页"
nextpage_text="下一页"
lastpage_text = "尾页"
str_temp_next=""
i=currentpage
if i < totalpage then
str_temp=str_temp_next &"<font size='1' color='#006600'>"
if trim(Condition)<>"" then str_temp_next=str_temp_next &"<a href='?"&Condition&"&page=" & i+1 & "'> "&nextpage_text&"</a></font> "
else
str_temp_next=str_temp_next &"<a href='?page=" & i +1 & "'> "&nextpage_text&"</a></font> "
end if
if trim(Condition)<>"" then
str_temp_next=str_temp_next &"<a href='?"&Condition&"&page=" & totalpage & "'> "&lastpage_text&"</a></font> "
else
str_temp_next=str_temp_next &"<a href='?"&Condition&"page=" & totalpage & "'> "&lastpage_text&"</a></font> "
end if
end if
'next
nextlistPages= str_temp_next
if i >1 then
if trim(Condition)<>"" then
str_temp_pre=str_temp_pre &"<a href='?"&Condition&"&page=" & 1 & "'> "&firstpage_text&"</a></font> "
else
str_temp_pre=str_temp_pre &"<a href='?"&Condition&"page=" & 1 & "'> "&firstpage_text&"</a></font> "
end if
str_temp_pre=str_temp_pre &" "
if trim(Condition)<>"" then
str_temp_pre=str_temp_pre &"<a href='?"&Condition&"&page=" & i-1 & "'> "&prepage_text&"</a></font> "
else
str_temp_pre=str_temp_pre &"<a href='?page=" & i-1 & "'> "&prepage_text&"</a> :" end if
end if
'next
prelistPages= str_temp_pre
if trim(Condition)<>"" then
prenextlistPages="<form name='fenye' action='?"&Condition&"' method='post'>"
else
prenextlistPages="<form name='fenye' action='?' method='post'>"
end if
prenextlistPages=prenextlistPages & "<font color=red>" & i &"</font>/<font color=red>" & totalpage & "</font>页，每页显示<font color=red>"&msg_per_page&"</font>条，共" & "<font color=red>" & totalrecordcount & "</font>条记录 " & prelistPages&nextlistPages
prenextlistPages=prenextlistPages&"第<input name='page' type='text' size='5'>页"
prenextlistPages=prenextlistPages& "<input type=submit name=Submit value=GO!>"
prenextlistPages=prenextlistPages&"</form>"
end function
參考答案:prenextlistPages这个函数本身是没什么问题，问题可能出在调用它的时候，Condition这个参数没正确传递过来。
你要把调用prenextlistPages函数的程序贴出来。
