每次换页关键字消失！如何解决？？（在线）

2003-09-03 03:21:59 81 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

银河麒麟（ky10）x86与arm双架构下编译zlmediakit的实战指南本文提供了在银河麒麟（ky10）操作系统上，针对x86与arm双架构编译部署流媒体服务器zlmediakit的完整实战指南。文章详细阐述了从环境准备、依赖安装、代码获取到编译构建与测试的全过程，重点解析了两种CPU架构下的关键差异与注意事项，帮助开发者高效完成国产化平台上的流媒体服务搭建。阅读详情

每次换页时，填写关键字的文本框就变空了，这是怎么一回事？只能查到第一页的内容，我很着急，希望有人帮忙！！

...全文

CMOS传输门实战：如何用模拟开关优化你的电路设计（附常见问题排查）本文深入探讨了CMOS传输门在电路设计中的实战应用与优化策略。文章从核心参数选型入手，详细分析了导通电阻、电荷注入等关键特性对电路性能的影响，并提供了多路复用器构建、精密电路应用等实战架构。同时，重点分享了PCB布局、电源去耦的工程细节，以及开关不导通、信号失真、高频性能不足等常见问题的系统性排查指南，旨在帮助硬件工程师充分发挥CMOS模拟开关的效能，提升电路设计的可靠性与精度。阅读详情

junyimei

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

jz_bnx 2003-09-03

打赏
举报

<%
...
Response.Write "<table width='155' cellpadding=0 cellspacing=0 border=0>"
Response.Write " <tr>"
Response.Write " <td class='title'>搜索查询</td>"
Response.Write " </tr>"
Response.Write " <tr>"
Response.Write " <td align='center'>"
Response.Write " <table width='120' cellpadding=2 cellspacing=0 border=0>"
Response.Write " <form name='frmSearch' action='basic_1.asp?menuid=1' method='post'>"
Response.Write " <tr>"
Response.Write " <td align='center'>"
Response.Write " <select name='selField' size=1>"
Response.Write " <option value='rymc' "
If sSearchField = "rymc" Then Response.Write "selected" End If
Response.Write " >按姓名查找</option>"
Response.Write " <option value='bmmc' "
If sSearchField = "bmmc" Then Response.Write "selected" End If
Response.Write " >按部门查找</option>"
Response.Write " <option value='ryzc' "
If sSearchField = "ryzc" Then Response.Write "selected" End If
Response.Write " >按职称查找</option>"
Response.Write " <option value='xl' "
If sSearchField = "xl" Then Response.Write "selected" End If
Response.Write " >按学历查找</option>"
Response.Write " </select><br>"
Response.Write " <input type='text' class='text' name='txtSearchWord' size=13 value='"& sSearchWord &"' onfocus='javascript:this.select()'><br>"
Response.Write " <input type='submit' name='btnSearch' class='button' value=' 搜索 '>"
Response.Write " </td>"
Response.Write " </tr>"
Response.Write " </form>"
Response.Write " </table>"
Response.Write " </td>"
Response.Write " </tr>"
Response.Write "</table>"

Dim iPageCount
Dim iRecordCount
Dim sSQL

Response.Write "<table cellspacing=0 cellpadding=2 width='96%'>"
Response.Write " <tr>"
Response.Write " <td class='listHeader' width='10%'>工号</td>"
Response.Write " <td class='listHeader' width='15%'>姓名</td>"
Response.Write " <td class='listHeader' width='10%'>性别</td>"
Response.Write " <td class='listHeader' width='10%'>民族</td>"
Response.Write " <td class='listHeader' width='15%'>学历</td>"
Response.Write " <td class='listHeader' width='20%'>所在部门</td>"
Response.Write " <td class='listHeader' width='20%'>职称</td>"
Response.Write " </tr>"
Response.Write "</table>"
sSQL = "Select rybh,rymc,ryxb,mz,bmbh,bmmc,ryzc,xl From zgxx Where "&sSearchField&" Like '%"& sSearchWord &"%' Order By "&sSort
Set oConn = GetDbfConnection(m_dataSource, m_dataSourceType)
Set oRS = GetDbfRecordSet(oConn,sSQL,1,1)
If Not oRS.Eof Then
oRS.PageSize = m_listRecordNumber
iPageCount = oRS.PageCount
iRecordCount = oRS.RecordCount
If iCurrentPage-iPageCount>0 Then iCurrentPage=iPageCount End If
oRS.AbsolutePage = iCurrentPage
Response.Write "<table cellspacing=1 cellpadding=5 class='tblList'>"
For i=1 To m_ListRecordNumber
If oRS.Eof Then Exit For
Response.Write " <tr>"
Response.Write " <td class='listItem' width='10%'><img src='../image/spacer.gif'><a href='#' onclick='javascript:BNX_detailWin(""basic_1_detail.asp?rybh="& oRS("rybh") &""",550,400)'>"& oRS("rybh") &"</td>"
Response.Write " <td class='listItem' width='15%'><img src='../image/spacer.gif'>"& oRS("rymc") &"</td>"
Response.Write " <td class='listItem' width='10%'><img src='../image/spacer.gif'>"& oRS("ryxb") &"</td>"
Response.Write " <td class='listItem' width='10%'><img src='../image/spacer.gif'>"& oRS("mz") &"</td>"
Response.Write " <td class='listItem' width='15%'><img src='../image/spacer.gif'>"& oRS("xl") &"</td>"
Response.Write " <td class='listItem' width='20%'><img src='../image/spacer.gif'>"& oRS("bmmc") &"</td>"
Response.Write " <td class='listItem' width='20%'><img src='../image/spacer.gif'>"& oRS("ryzc") &"</td>"
Response.Write " </tr>"
oRS.MoveNext
Next
Response.Write "</table>"
Response.Write "<table width='96%' cellspacing=0 cellpadding=2>"
Response.Write " <tr>"
Response.Write " <td class='pageBar'>"
Response.Write " 每页记录数："& m_listRecordNumber &" 记录总数："&iRecordCount&" 当前页次："&iCurrentPage&"/"&iPageCount&" "
If iPageCount = 1 Then
Response.Write " 前一页后一页 "
Else If iCurrentPage=1 Then
Response.Write " 前一页 <a href='#' onclick=""javascript:BNX_gotoPage('basic_1.asp?menuid=1&sort="&sSort&"&page=','frmSearch',2)"">后一页</a> "
Else If iCurrentPage = iPageCount Then
Response.Write " <a href='#' onclick=""javascript:BNX_gotoPage('basic_1.asp?menuid=1&sort="&sSort&"&page=','frmSearch',"& iPageCount-1 &")"">前一页</a> 后一页 "
Else
Response.Write " <a href='#' onclick=""javascript:BNX_gotoPage('basic_1.asp?menuid=1&sort="&sSort&"&page=','frmSearch',"& iCurrentPage-1 &")"">前一页</a> <a href='#' onclick=""javascript:BNX_gotoPage('basic_1.asp?menuid=1&sort="&sSort&"&page=','frmSearch',"& iCurrentPage+1 &")"">后一页</a> "
End If
End If
Response.Write "<input type='text' class='text' name='txtGotoPage' size=4 value='"& iCurrentPage &"' onfocus='javascript:this.select()' onkeyup='value=value.replace(/[^\d]/gi,"""")'>"
Response.Write " <input type='button' name='btnSubmit' value='GO' class='button' onclick=""javascript:BNX_gotoPage('basic_1.asp?menuid=1&sort="&sSort&"&page=','frmSearch',MM_findObj('txtGotoPage').value);"">"
End IF
Response.Write " </td>"
Response.Write " </tr>"
Response.Write "</table>"
End If
closeRecordSet(oRS)
closeConnection(oConn)
...
%>

我现在就是这么用的，^-^

cfzx 2003-09-03

打赏
举报

用url传递参数，如果不明白可以看看google的url

raoguofeng 2003-09-03

打赏
举报

怎么样看懂了吗要是你还是不会这样把你的页面贴出来我给你改呵呵很简单的不过你要快因为我要下班了了呵呵

raoguofeng 2003-09-03

打赏
举报

很简单！！比如说你翻页不就是下一页吗你这样写

xxx.asp?pp=<%=你要传递的参数%>&pageno=<%=pageno+1%>
接收的时候你这样写
tt=Request.QueryString("pp")

你不是要在查询框里显示出来吗
这样写
<input name="tt" type="text" value="<%response.Write(tt)%>" size="50">maxlength="100">明白？？
简单吧！

junyimei 2003-09-03

打赏
举报

阿标，你的方法不行；wcq我已经做传递了亚

junyimei 2003-09-03

打赏
举报

wcqwcqwcq 2003-09-03

打赏
举报

换页带上参数
if page<>1 then
response.write "  <a href=XXX.asp?txtpage=1&keyword="&keyword&"><font size=2>第一页</font></a>"
response.write "  <a href=XXX?txtpage="&(page-1)&"&keyword="&keyword&"><font size=2>上一页</font></a>"
end if
if page<>rs.pagecount then
response.write "  <a href=XXX.asp?txtpage="&(page+1)&"&keyword="&keyword&"><font size=2>下一页</font></a>"
response.write "  <a href=XXX.asp?txtpage="&rs.pagecount&"&keyword="&keyword&"><font size=2>最后一页</font></a>"
end if

csdntoll 2003-09-03

打赏
举报

Response.Write"<a href='page.asp?page="&j&"&cn="&keyword&"'>["&j&"]</a>"

注意连接符&

junyimei 2003-09-03

打赏
举报

蓝羽，你说的意思我明白，虽然我不用js的,我试过不行

ajoy 2003-09-03

打赏
举报

直接在分页时候把参数传递过去即可

jz_bnx 2003-09-03

打赏
举报

BainStudio 2003-09-03

打赏
举报

最好你在连接一个新页面的时候,都把这个数据给传递过去.否则将失效.

wxlada 2003-09-03

打赏
举报

要在页面传递关键字，要么直接加在地址后面的关键字传递，如果用FORM的话，就用

<input type="hidden">来传递。session的话，timeout后会丢失的。

飞羽 2003-09-03

打赏
举报

飞羽 2003-09-03

打赏
举报

junyimei 2003-09-03

打赏
举报

<form method="post" action="page.asp">
请输入关键字：
<input type="text" name="cn" >
<input type="submit" value="搜索" name="submit">
</form>

<%
keyword=request.form("cn")
set mycon=server.createobject("adodb.connection")
set mycom=server.createobject("adodb.command")
set myrec=server.createobject("adodb.recordset")
mycon.open "driver={sql server};server=hxy;Password=qf;User ID=sa;Database=agricultures"
myrec.open "select cid,cname from dbo.companys1 where cname like '%"&keyword&"%'",mycon,3,3
%>
<table width="90%" border="0">
<tr>
<td>
<%
if keyword="" then
response.write(" ")
else
if myrec.bof and myrec.eof then
response.write("未搜索到相关纪录，请做其他尝试")
%>
</td>
</tr>
<%
else
nowpage=request.querystring("page")
if nowpage="" then
ispage=1
else
ispage=nowpage
end if
myrec.pagesize=3
myrec.absolutepage=ispage
totpage=myrec.pagecount
while ( i<3 and not myrec.eof)
%>
<tr><td><%=myrec.fields(1).value%></td></tr>
<%
i=i+1
myrec.movenext
wend
%>
<tr><td>
<%
response.write("总共搜索到"&totpage&"页")
for j=1 to totpage
If j = CInt(Request.QueryString("page")) Then
Response.Write"["&j&"]"
Else
Response.Write"<a href='page.asp?page="&j&"cn="&keyword&"'>["&j&"]</a>"
End If
next
myrec.close
end if
end if
%>
</td></tr>
</table>

junyimei 2003-09-03

打赏
举报

<input name="text1" type="text" value="<%=session("a")%>">还是不行
换页，就是先把查询结果用多页显示，但现在每次换页的时候，关键字消失，所以显示不出任何结果

junyimei 2003-09-03

打赏
举报

我这里网苏太慢，我发个留言，都上不去！！

csdntoll 2003-09-03

打赏
举报

换页?什么意思？把你要做的动作意图说说，

tigerwen01 2003-09-03

打赏
举报

用来session保存关键字。

加载更多回复（5）

每次换页关键字消失！如何解决？？（在线）

相关推荐