asp数据循环的错误问题
以下代码是通过循环接收一组多选框来循环写出多选框的值,不知道是哪里错了,高手帮忙看看。首页index.asp<!--#includefile="conn.asp"--><...
以下代码是通过循环接收一组多选框来循环写出多选框的值,不知道是哪里错了,高手帮忙看看。
首页index.asp
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from lun"
rs.open sql,conn,2,3
if rs.eof or rs.bof then
response.Write("暂无影片信息!")
else
response.Write("<form name=""form1"" method=""post"" action=""lun2.asp"">")
do while not rs.eof
n=rs("name")
m=rs("xu")'原序号
response.Write(n)
response.Write("<input type=""checkbox"" name=""c"" value='"&m&"' />")
response.Write("<p>")
rs.movenext
loop
response.Write("<input type=""submit"" name=""Submit"" value=""确定"" />")
response.Write("</form>")
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
接受处理的页面chuli.asp
<!--#include file="conn.asp"-->
<%
dim i,t
for i=1 to request.Form("c").count
t=request.Form("c")(i)
set rs=server.createobject("adodb.recordset")
sql="select * from lun where [xu]='"&t&"'"
rs.open sql,conn,1,3
n(i)=rs("name")
response.Write(n(i))
rs.close
conn.close
set rs=nothing
set conn=nothing
next
%> 展开
首页index.asp
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from lun"
rs.open sql,conn,2,3
if rs.eof or rs.bof then
response.Write("暂无影片信息!")
else
response.Write("<form name=""form1"" method=""post"" action=""lun2.asp"">")
do while not rs.eof
n=rs("name")
m=rs("xu")'原序号
response.Write(n)
response.Write("<input type=""checkbox"" name=""c"" value='"&m&"' />")
response.Write("<p>")
rs.movenext
loop
response.Write("<input type=""submit"" name=""Submit"" value=""确定"" />")
response.Write("</form>")
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
接受处理的页面chuli.asp
<!--#include file="conn.asp"-->
<%
dim i,t
for i=1 to request.Form("c").count
t=request.Form("c")(i)
set rs=server.createobject("adodb.recordset")
sql="select * from lun where [xu]='"&t&"'"
rs.open sql,conn,1,3
n(i)=rs("name")
response.Write(n(i))
rs.close
conn.close
set rs=nothing
set conn=nothing
next
%> 展开
5个回答
展开全部
1.chuli.asp中把这个<!--#include file="conn.asp"-->放到
set rs=server.createobject("adodb.recordset")
sql="select * from lun where [xu]='"&t&"'"
rs.open sql,conn,1,3前面,因为每次查询完毕后就关闭了数据库,
rs.close
conn.close
set rs=nothing
set conn=nothing
2.需要首先定义数组
dim n()
redim n(request.Form("c").count)
3.因为数组是从第一个开始赋值的,n(0),所以n(i)=rs("name")应该改为n(i-1)=rs("name")
完整代码如下:
<%
dim n()
redim n(request.Form("c").count)
for i=1 to request.Form("c").count
t=request.Form("c")(i)
<!--#include file="conn.asp"-->
set rs=server.createobject("adodb.recordset")
sql="select * from lun where [xu]='"&t&"'"
rs.open sql,conn,1,3
n(i-1)=rs("name")
response.Write(n(i))
rs.close
conn.close
set rs=nothing
set conn=nothing
next
%>
set rs=server.createobject("adodb.recordset")
sql="select * from lun where [xu]='"&t&"'"
rs.open sql,conn,1,3前面,因为每次查询完毕后就关闭了数据库,
rs.close
conn.close
set rs=nothing
set conn=nothing
2.需要首先定义数组
dim n()
redim n(request.Form("c").count)
3.因为数组是从第一个开始赋值的,n(0),所以n(i)=rs("name")应该改为n(i-1)=rs("name")
完整代码如下:
<%
dim n()
redim n(request.Form("c").count)
for i=1 to request.Form("c").count
t=request.Form("c")(i)
<!--#include file="conn.asp"-->
set rs=server.createobject("adodb.recordset")
sql="select * from lun where [xu]='"&t&"'"
rs.open sql,conn,1,3
n(i-1)=rs("name")
response.Write(n(i))
rs.close
conn.close
set rs=nothing
set conn=nothing
next
%>
展开全部
1、你可以查看index.asp的源代码看看你那input里面有值吗?
2、序号是数字吗?如是:
sql="select * from lun where [xu]="&t
2、序号是数字吗?如是:
sql="select * from lun where [xu]="&t
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在for i=1 to request.Form("c").count 出错了
把它改为
c=split(request.Form("c"),", ")
for i=1 to ubound(c)
把它改为
c=split(request.Form("c"),", ")
for i=1 to ubound(c)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你写法有问题,你可以直接接收,
t=request.from("c")
sql="select * from lun where [xu] in ('"&t&"') "
rs.open sql,conn,1,3
do while not rs.eof
输出查询出来的相关数据
rs.movenext
loop
t=request.from("c")
sql="select * from lun where [xu] in ('"&t&"') "
rs.open sql,conn,1,3
do while not rs.eof
输出查询出来的相关数据
rs.movenext
loop
参考资料: http://www.iseofox.com
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询