請各位大俠HELP，為什麼數值傳遞有問題？在線等待，來者有分

alf7927 2002-07-26 06:18:42
我做了一個信息檢索功能的ASP，主要功能是分面顯示檢索信息，這裡涉及到一個數據傳遞的問題，在處理上。我把一些數據放在不可見的控中，在傳遞後，數值為空，
源程式如下
<html>
<head>
<title>分頁顯示查詢結果</title>
<meta http-equiv="Content-Type" content="text/html; charset=big5">

</head>
<%
dim conn,connstr,s1
connstr="DBQ="+server.mappath("data.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=Server.CreateObject("ADODB.CONNECTION")
conn.open connstr

set rs=Server.CreateObject("Adodb.Recordset")
dim sm,lb,cbs,jyr
sm=request.form("sm")
lb=request.form("lb")
cbs=request.form("cbs")
jyr=request.form("jyr")
s1="select id,sm,lb,cbs,jf,jyr from BOOK where ("

response.write"KK"
response.write lb
response.write cbs
response.write jyr


if sm<>"" then
s1=s1&"sm="&"'"&sm&"'"
flag=1
end if
if lb<>"0" and flag=1 then
s1=s1&" and lb="&"'"&lb&"'"
flag=1
elseif lb<>"0" then
s1=s1&"lb="&"'"&lb&"'"
flag=1
end if
if cbs<>"1" and flag=1 then
s1=s1&" and cbs="&"'"&cbs&"'"
flag=1
elseif cbs<>"1" then
s1=s1&"cbs="&"'"&cbs&"'"
flag=1
end if
if jyr<>"2" and flag=1 then
s1=s1&" and jyr="&"'"&jyr&"'"
flag=1
elseif jyr<>"2" then
s1=s1&"jyr="&"'"&jyr&"'"
flag=1
end if

s1=s1&")"
if sm="" and lb="0" and cbs="1" and jyr="2" then
s1="select id,sm,lb,cbs,jf,jyr from BOOK "
end if

response.write s1
rs.open s1,conn,1,3
if NOT rs.EOF then
rs.PageSize=5
rowcount=rs.PageSize
scrollaction=Request.Form("scrollaction")
if scrollaction<>"" then
pageno=Mid(scrollaction,2,1)
if pageno<1 then
pageno=1
end if
else
pageno=1
end if

rs.AbsolutePage= pageno
%>

<body bgcolor="#FFFFFF" background="img/back5.jpg">
<div align="center">
<p> </p>
<p> </p>
<p><font color="#0000FF" size="+5" face="標楷體"><b>查詢結果 </b></font></p>
<p>  </p>


<p><font face="標楷體"><b><font color="#CC3333"> </font></b></font></p>
<form name="form1" >
</form>
<table bgcolor=#FFFFFF border=1 bordercolordark=#3366FF bordercolorlight=#CC3366
cellpadding=2 cellspacing=0 height=40 width=680 align="center" bordercolor="#CC3333">
<tr bgcolor="#FFFFFF" valign="middle" align="center">
<td width=60 height="14">序號</td>
<td width=137 height="14">書名</td>
<td width=113 height="14">類別</td>
<td width=133 height="14">出版社</td>
<td width=81 height="14">借否</td>
<td colspan=16 width=118 height="14">借用人</td>
</tr>

<%
rs.movefirst
rowcount=rs.PageSize
do while NOT rs.eof and rowcount>0
%>
<tr>
<% for i=0 to 5%>
<td align=center width=60 height="20"><% =rs(i) %></td>
<%next%>
</tr>
<%
rowcount=rowcount-1
rs.movenext
loop
%>
</table>
<font face="標楷體"><b><font color="#CC3333">請選擇查看詳細信息序號</font></b></font> <font face="標楷體"><b><font color="#CC3333">
<select name="menu1" >
<option selected>請選擇</option>
<%
rs.movefirst
rs.AbsolutePage=pageno
rowcount=rs.pagesize
do while not rs.eof and rowcount>0
%>
<option><%=rs("id")%></option>
<%
rs.movenext
rowcount=rowcount-1
loop
%>
</select>
</font></b></font><font face="標楷體"><b><font color="#CC3333">
<input type="submit" name="b1" value="查看">
</font></b></font><br>
<form method=post action="view.asp">

<input type="hidden" name "lb" value="<%=lb%>"> 《問題是傳不過去，為空》
<input type="hidden" name "cbs" value="<%=cbs%>">
<input type="hidden" name "jyr" value="<%=jyr%>">
<input type="hidden" name "sm" value="<%=sm%>">


就這這幾個數據，傳到下頁為空，我看了一天了，不知怎麼辦

<% if pageno>1 then %>
<p align="center">
<input type="submit" name="scrollaction" value="<%="第"&pageno-1&"頁"%>"style="color:#0000000; font_size:12pt;">
<%end if %> <%if rowcount=0 then %>
<input type="submit" name="scrollaction" value="<%="第"&pageno+1&"頁"%>"style="color:#0000000; font_size:12pt;">
<font color="#333399"><%end if%> <font face="標楷體"><b><font size="+1">返回</font></b></font></font>
</form>
</div>
<%else%>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>


<td width ="15%"></td>
<td width ="67%">
<p align="center"></p>
<p align="center"><font size="+4" color="#CC3333">對不起，您查找的記錄不存在 ！</font></p>
</td>
<td width="18%"></td>
</tr>
</table>
<% end if%>
<%
response.write"KqwqwqwK"
response.write lb
response.write cbs
response.write jyr
%>
<%set conn=nothing
set rs=nothing %>


</body>
</html>


請給點提示，
...全文
29 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
alf7927 2002-07-27
  • 打赏
  • 举报
 回复
謝謝大家
alf7927 2002-07-27
  • 打赏
  • 举报
 回复
thinkover(至真宝) ：
你把我想的也太弱智了，當然會接收了，但為空值，不知為什麼
alf7927 2002-07-27
  • 打赏
  • 举报
 回复
各位，這一頁即是接收頁，在程式上部分有接收語句，但是值為空。我的意思是實現分面功能，即傳送和接收都為本頁，但是在程式中卻沒有值
happynet 2002-07-27
  • 打赏
  • 举报
 回复
你现在已经有通过FORM传送，接受时应该用

lb=request.form("lb")
cbs=request.form("cbs")
jyr=request.form("jyr")
sm=request.form("sm")
<input type="hidden" name "lb" value="<%=lb%>"> 类似这样的，你应该在name后面加入等号。
为：<input type="hidden" name="lb" value="<%=lb%>">
liuzxit 2002-07-27
  • 打赏
  • 举报
 回复
你先把hidden改成text看看它本身有沒有值﹐說不定它本身就為空了
JavaCoffee 2002-07-26
  • 打赏
  • 举报
 回复
在接收时漏了一条，应该是：
lb=request("lb")
cbs=request("cbs")
jyr=request("jyr")
sm=request("sm")
JavaCoffee 2002-07-26
  • 打赏
  • 举报
 回复
将你的这几句：
<input type="hidden" name "lb" value="<%=lb%>"> 《問題是傳不過去，為空》
<input type="hidden" name "cbs" value="<%=cbs%>">
<input type="hidden" name "jyr" value="<%=jyr%>">
<input type="hidden" name "sm" value="<%=sm%>">

改为：

<input type="hidden" name= "lb" value="<%=lb%>"> 《問題是傳不過去，為空》
<input type="hidden" name= "cbs" value="<%=cbs%>">
<input type="hidden" name= "jyr" value="<%=jyr%>">
<input type="hidden" name= "sm" value="<%=sm%>">

另外，在接收页面里，采用下面的方法接收：
cbs=request("cbs")
jyr=request("jyr")
sm=request("sm")

应该没有问题了，你试试吧，有问题短信联系。
基于Socket的Android手机视频实时传输所有源程序
基于Socket的Android手机视频实时传输所有源程序，包括Android客户端和PC端。同时包含说明文档。
VMware ESXI 6.5安装成功 后 管理页面网页不显示登录对话框？请问各位大侠，是什么原因
VMware ESXI 6.5安装成功 后 管理页面网页不显示登录对话框？请问各位大侠，是什么原因
C# For Unity系列之入门篇
你想当“李逍遥”式的“大侠”吗？ 这里无需计算机基础，无需编程经验，你也不必是计算机专业的在校大学生....只要爱好游戏，怀揣梦想！ 有一定自主学习能力，跟着刘老师从“编程小白”修炼为游戏研发“大虾”吧！！！学习好Unity，其先决条件是一定要有稳固、扎实的编程基础！课程 《C# For Unity系列之入门篇》配套学习资料链接：http://pan.baidu.com/s/1gflxreN 密码：sou5；刘老师讲Unity学员群(2) 497429806一、热更新系列(技术含量：中高级)：A：《lua热更新技术中级篇》https://edu.csdn.net/course/detail/27087B：《热更新框架设计之Xlua基础视频课程》https://edu.csdn.net/course/detail/27110C：《热更新框架设计之热更流程与热补丁技术》https://edu.csdn.net/course/detail/27118D：《热更新框架设计之客户端热更框架(上)》https://edu.csdn.net/course/detail/27132E：《热更新框架设计之客户端热更框架(中)》https://edu.csdn.net/course/detail/27135F：《热更新框架设计之客户端热更框架(下)》https://edu.csdn.net/course/detail/27136二：框架设计系列(技术含量：中级)： A：《游戏UI界面框架设计系列视频课程》https://edu.csdn.net/course/detail/27142B：《Unity客户端框架设计PureMVC篇视频课程(上)》https://edu.csdn.net/course/detail/27172C：《Unity客户端框架设计PureMVC篇视频课程(下)》https://edu.csdn.net/course/detail/27173D：《AssetBundle框架设计_框架篇视频课程》https://edu.csdn.net/course/detail/27169三、Unity脚本从入门到精通(技术含量：初级)A：《C# For Unity系列之入门篇》https://edu.csdn.net/course/detail/4560B：《C# For Unity系列之基础篇》https://edu.csdn.net/course/detail/4595C: 《C# For Unity系列之中级篇》https://edu.csdn.net/course/detail/24422D：《C# For Unity系列之进阶篇》https://edu.csdn.net/course/detail/24465四、虚拟现实(VR)与增强现实(AR):(技术含量：初级)A：《虚拟现实之汽车仿真模拟系统 》https://edu.csdn.net/course/detail/26618五、Unity基础课程系列(技术含量：初级) A：《台球游戏与FlappyBirds—Unity快速入门系列视频课程（第1部）》 https://edu.csdn.net/course/detail/24643B：《太空射击与移动端发布技术-Unity快速入门系列视频课程（第2部）》https://edu.csdn.net/course/detail/24645 C：《Unity ECS(二) 小试牛刀》https://edu.csdn.net/course/detail/27096六、Unity ARPG课程(技术含量：初中级)：A：《MMOARPG地下守护神_单机版实战视频课程(上部)》https://edu.csdn.net/course/detail/24965B：《MMOARPG地下守护神_单机版实战视频课程(中部)》https://edu.csdn.net/course/detail/24968C：《MMOARPG地下守护神_单机版实战视频课程(下部)》https://edu.csdn.net/course/detail/24979
求教各位大侠:问题事件AppHangB1
打开网页的时候,有时突然会没有响应,提示: [b]出现了一个问题，该问题导致了此程序停止与 Windows 进行交互[/b]。此时不得不关闭网页,从而自动关闭IE,尽管关闭后然后重新开启IE可以解决问题,但是由此感觉很不方便,也很不爽.求教各位大侠,希望可以帮忙解决这个问题.提前谢过!以下是问题详细信息. 描述: 出现了一个问题，该问题导致了此程序停止与 Windows 进行交互。 ...
IntelliJ IDEA 在使用manven后的纠结（每次修改代码都要重启tomcat才能看效果吗？），请各位大侠来看看问题
IntelliJ IDEA 在使用manven后的纠结（每次修改代码都要重启tomcat才能看效果吗？），请各位大侠来看看问题
ASP

28,390

社区成员

357,060

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章