急阿,asp分页问题!

2004-04-05 06:50:58 179 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

2025.03.14【读书笔记】|GWAS分析神器：BOLT-LMM工具介绍与快速安装在生物信息学领域，全基因组关联分析（GWAS）已成为揭示遗传与疾病关系的强有力工具。BOLT-LMM作为一款专为大规模样本量设计的GWAS分析工具，将极大地提高研究人员的工作效率。大家好，今天我们来聊聊一个非常强大的生物信息学工具——BOLT-LMM。它是基于线性混合模型（LMM）的全基因组关联分析（GWAS）分析工具，通过快速的方差近似方法在计算效率上实现了显著的提升。BOLT-LMM的高效性能使其成为大规模样本GWAS分析的理想选择，它将进一步推动生物信息学和遗传学研究的发展。阅读详情

我按照http://www.52design.com/html/2004-1-14/2004114171910.asp设计我的分页程序,它的SQL语句是:StrSQL="Select ID,姓名,住址,电话 from 通讯录 Order By ID".
但是我的SQL语句是从另外一个asp文件的一个Form中通过Request()取得的.这样,我按照它的方法分页时,调用的仍是本身的asp程序,名字叫search.asp,只不过在后面加上参数page.而这时SQL语句就不对了,因为Request()就是空了.

请问怎么办?也就是怎么保存我的sql语句?

...全文

LangGraph的容错机制：从节点失败到图级回滚核心概念铺垫：讲解LLM应用容错与事务性的核心概念（幂等性、重试策略、降级策略、快照、回滚、原子性、一致性、隔离性、持久性、最终一致性），对比LangGraph容错机制与传统数据库ACID事务、Apache Airflow/Kubernetes Workflow/Kubeflow Pipelines容错机制的异同；LangGraph容错机制的演进历史：用markdown表格梳理LangGraph从0.0.1到1.5.0（截止202X年X月）的容错机制发展历程；节点级别的容错：重试与降级。阅读详情

braversmmu

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

braversmmu 2004-04-06

打赏
举报

嘿嘿，我用Cookies搞定了，谢谢大家！

叮咚叮咚叮叮咚 2004-04-05

打赏
举报

我看不懂你的意思
needsql=request.form("field") '比如需要字段为id,title
StrSQL="Select "& needsql &" from 通讯录 Order By ID".

braversmmu 2004-04-05

打赏
举报

其实我就是想把第一次运行得到的sql语句保存下来。怎么保存？

braversmmu 2004-04-05

打赏
举报

同意楼上的，但是怎么传阿？

try52000 2004-04-05

打赏
举报

兄弟注意啊！！
你在页头接收了多少变量，那么在页面的链接上也要一直带着走。

b4ys 2004-04-05

打赏
举报

到我的论坛里看看吧，里面有我收集了大量的ASP方面的资料，也许对你有帮助。
http://csdn2.126.com

lawdoor 2004-04-05

打赏
举报

下面是我的分页，效率很高，耗费时间极短，请享用：

<%
dim i,intPage,page,pre,last,filepath
set rs = server.CreateObject("adodb.recordset")
sql="select * from user order by user_ID desc"
rs.PageSize = 20 '这里设定每页显示的记录数
rs.CursorLocation = 3
rs.Open sql,conn,0,2,1 '这里执行你查询SQL并获得结果记录集
pre = true
last = true
page = trim(Request.QueryString("page"))

if len(page) = 0 then
intpage = 1
pre = false
else
if cint(page) =< 1 then
intpage = 1
pre = false
else
if cint(page) >= rs.PageCount then
intpage = rs.PageCount
last = false
else
intpage = cint(page)
end if
end if
end if
if not rs.eof then
rs.AbsolutePage = intpage
end if
%>
循环体开始：
<%
for i=1 to rs.PageSize
if rs.EOF or rs.BOF then exit for
%>
..................
..................
...................
<%
rs.movenext
next
%>
循环体结束
分页部分：
<table width="99%" border="1" cellpadding="2" cellspacing="2" borderColorLight=#808080 borderColorDark=#ffffff>
<tr>
<%if rs.pagecount > 0 then%>
<td width="13%" align="left">当前页<%=intpage%>/<%=rs.PageCount%></td>
<%else%>
<td width="41%" align="left">当前页0/0</td><%end if%>
<td width="46%" align="right"> <a href="document_manage.asp?page=1">首页</a>|
<%if pre then%>
<a href="document_manage.asp?page=<%=intpage -1%>">上页</a>| <%end if%>
<%if last then%>
<a href="document_manage.asp?page=<%=intpage +1%>">下页</a> |<%end if%>
<a href="document_manage.asp?page=<%=rs.PageCount%>">尾页</a>|转到第
<select name="sel_page" onchange="javascript:location=this.options[this.selectedIndex].value;">
<%
for i = 1 to rs.PageCount
if i = intpage then%>
<option value="document_manage.asp?page=<%=i%>" selected><%=i%></option>
<%else%>
<option value="document_manage.asp?page=<%=i%>"><%=i%></option>
<%
end if
next
%>
</select>页</font>
</td>
</tr>
</table>
分页是下拉显示的，很好用！

liuyangxuan 2004-04-05

打赏
举报

接楼上
最好在分页程序前面加句：
If not rs.eof then
.......................

zl9732 2004-04-05

打赏
举报

比如：
dim page
page=request("page")
if page="" or page<0 then
page=1
else
page=cint(page)
end if

...
...
rs.pagesize=perpage 'perpage是每页显示的记录数
rs.absolutepage=page
.....
do while not ....

loop

loveweb 2004-04-05

打赏
举报

你把那些值也传过去不就得了

braversmmu 2004-04-05

打赏
举报

我的意思就是:
如果SQL语句是固定的,就可以用http://www.52design.com/html/2004-1-14/2004114171910.asp的分页方法.但是我的SQL语句中的一些字段的值也是通过request获得的.如果分页的时候能把这些request的值也加到后面,就对了.请问怎么做?

急阿,asp分页问题!

相关推荐