ASP
急...这该死的分页...折腾死人了.
墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年，写一次发全网
我也要 关注 + 加入社区
<%
dim kind,tree_name,Page,thePageSize,ttlPage,i,ttlRDCnt
kind=Request("kind")
tree_name=Request("tree_name")
tree_name=replace(tree_name,"!","")
tree_name=replace(tree_name,"~","")
tree_name=replace(tree_name,"`","")
if kind="不要求" and tree_name="" then Response.Redirect("../supply_list.asp") end if
dim objRs,sqlStr
set objRs=Server.CreateObject("ADODB.Recordset")
sqlStr="select * from purvey "
if kind<>"不要求" or tree_name<>"" then
sqlStr=sqlStr & " where"
end if
if kind<>"不要求" then
sqlStr=sqlStr & " kind='"&kind&"'"
end if
if kind<>"不要求" and tree_name<>"" then
sqlStr=sqlStr & " and "
end if
if tree_name<>"" then
sqlStr=sqlStr & " tree_name='"&tree_name&"'"
end if
Response.Write(sqlStr)
objRs.open sqlStr,objConn,3,2
%>
<%
thePageSize=2 '定义每页最多显示文章数
page=Request("Page")
if not IsNumeric(Page) then
Page=1
else
Page=Clng(Page)
end if
if Page<=1 then
Page=1
end if
if not objRs.eof then
objRs.PageSize=thePageSize
ttlPage=objRs.PageCount
ttlRDCnt=objRs.Recordcount
end if
if Page>ttlPage then
Page=ttlPage
objRs.AbsolutePage=Page
end if
%>
.....
<%
for i=1 to thePageSize
if objRs.eof then exit for
%>
<tr>
<td height="25" align="center" valign="bottom" class="under_line_ccc"><%= objRs("tree_name") %></td>
<td align="center" valign="bottom" bgcolor="#f2f5fe" class="under_line_ccc">W:<%= objRs("coronal") %>，
H:<%= objRs("hight")% >，Φ:<%= objRs("chest") %></td>
<td align="center" valign="bottom" class="under_line_ccc"><%= objRs("unit") %></td>
<td align="center" valign="bottom" bgcolor="#f2f5fe" class="under_line_ccc"><%= objRs("kind") %>类</td>
<td align="center" valign="bottom" class="under_line_ccc"><a href="supply_seach_view.asp#?trees_id=<%= objRs("id") %>" title="点击查看更详细信息" target="ads_pop"><font color="#666666">查看详细</font></a></td>
</tr>
<% objRs.movenext
next
end if
%>
....
<td height="23" colspan="5" valign="top">
<% if ttlRDCnt>2 then %>
<font color="#000000">共</font><font color="#666666"><%= ttlRDCnt%></font><font color="#000000">条信</font><font color="#000000">息 每页</font><font color="#666666"><%= thePageSize %></font><font color="#000000">条 当前第</font><font color="#666666"><%= Page %></font><font color="#000000">页</font> <font color="#666666">|</font> <font color="#000000">选择</font>
<% for i=1 to ttlPage %>
<a href="supply_list.asp?Page=<%= i %>"><font color="#666666"><%= i %></font></a>
<% next %>
<font color="#000000"> ... </font> <a href="supply_list.asp?Page=<%= Page-1 %>&kind=<%= kind %>&tree_name=<%=tree_name %>" target="ads_pop"><font color="#000000">上一页</font></a>
<a href="supply_list.asp?Page=<%=Page+1 %>&kind=<%=kind %>&tree_name=<%=tree_name %>" target="ads_pop"><font color="#000000"> 下一页</font></a>
<% end if %>
</td>
这个对查询结果的分页.不知错在那儿了,折腾好久了都没搞定,一点击"上一页或下一页"就出现"找不到该网页错误"
唉,人太笨了,没法.寻求好心人解答万分感谢!
相关推荐
增强型PID-自适应-前馈-神经网络控制研究（Matlab代码实现）
内容概要：本文系统研究了“增强型PID-自适应-前馈-神经网络控制”复合控制策略，结合Matlab代码与Simulink仿真模型，深入探讨了传统PID控制与智能控制算法的深度融合方法。该策略通过引入自适应机制和前馈补偿，结合BP神经网络进行非线性系统建模与参数优化，并融合扩展卡尔曼滤波（EKF）等状态估计技术，提升控制系统在复杂动态环境下的响应速度、鲁棒性和控制精度。研究涵盖双闭环控制架构设计、神经网络训练流程、EKF状态融合等关键技术环节，适用于电机控制、电力电子变换器、无人机、微电网等高阶非线性系统的建模与仿真。配套资源丰富，包含多个可复现的Simulink模型、Matlab代码及参考文献，尤其支持高水平EI期刊成果的复现与验证。; 适合人群：具备自动控制理论基础和Matlab/Simulink仿真能力，从事控制工程、电气自动化、电力电子或智能系统研发的研究生、科研人员及工作1-3年以上的工程技术人员； 使用场景及目标：①深入研究先进PID控制策略在非线性系统中的优化应用；②实现神经网络与经典控制算法的协同设计与联合仿真；③开展状态估计、参数辨识与智能控制策略的实验验证；④复现并拓展高水平学术论文中的控制方法，支撑科研创新与项目开发； 阅读建议：建议结合提供的Matlab代码与Simulink仿真模型进行实践操作，重点剖析控制结构设计逻辑、神经网络训练过程及EKF状态估计的实现细节，按照文档说明逐步调试与优化，以全面掌握复合控制系统的建模、仿真与性能评估方法。
MATLAB项目，模拟曲柄滑块机构的运动学和动力学.zip
1.版本：matlab2014a/2019b/2024b 2.附赠案例数据可直接运行。 3.代码特点：参数化编程、参数可方便更改、代码编程思路清晰、注释明细。 4.适用对象：计算机，电子信息工程、数学等专业的大学生课程设计、期末大作业和毕业设计。
基于MATLAB的Abel反演和Fowler–Milne诊断研究对HyperFill TWGMAW-P进行了电波形分析。.zip
1.版本：matlab2014a/2019b/2024b 2.附赠案例数据可直接运行。 3.代码特点：参数化编程、参数可方便更改、代码编程思路清晰、注释明细。 4.适用对象：计算机，电子信息工程、数学等专业的大学生课程设计、期末大作业和毕业设计。
【带状电容器计算用于电容式触摸传感器应用】半数值模型的电容式触摸传感器集成于金属基材涂层中研究（Matlab代码实现）
内容概要：本文针对集成于金属基材涂层中的电容式触摸传感器，提出了一种用于带状电容器电容计算的半数值模型，并基于Matlab平台实现了仿真分析。该模型结合解析方法与数值计算，采用有限差分法求解二维泊松方程，精确模拟传感器在金属背景下的电场分布，有效克服了金属基底对电容信号的屏蔽与干扰问题，显著提升了触摸检测的灵敏度与稳定性。研究系统探讨了传感器的几何结构、介电层材料特性、电极尺寸及间距等关键参数对电容响应的影响机制，建立了完整的建模流程与仿真框架，为高性能、高抗干扰能力的电容式触控器件在智能家居、工业控制面板及复杂电磁环境下的实际应用提供了理论支撑与技术路径。; 适合人群：具备电磁场与电磁波、数值计算方法基础，熟悉Matlab编程，从事传感器设计、人机交互技术开发、电子器件仿真及相关领域研究的科研人员、工程师及研究生。; 使用场景及目标：①面向金属表面集成的电容式触摸传感器进行高精度建模与性能优化；②为智能家电、工业设备等人机接口的触控模块提供抗干扰设计与仿真验证方案；③支撑相关科研课题的理论分析、算法开发与原型系统验证。; 阅读建议：学习者应结合提供的Matlab代码深入理解半数值建模的具体实现过程，重点掌握有限差分法在电场求解中的应用技巧，并可通过调整传感器结构参数与材料属性开展对比仿真，进而探究各因素对灵敏度的影响规律，全面提升对电容式传感机制的理解与工程化设计能力。
aerosonde-fc-hybrid-uav-sim-main.zip
1.版本：matlab2014a/2019b/2024b 2.附赠案例数据可直接运行。 3.代码特点：参数化编程、参数可方便更改、代码编程思路清晰、注释明细。 4.适用对象：计算机，电子信息工程、数学等专业的大学生课程设计、期末大作业和毕业设计。
