Question

缺少 'Wend'

<!--#include file="conn.asp"-->
<%
if request("detel")="删除" and request("seltyid")<>"" then
count=0
condition=""
condition1=""
condition2=""
end if
for each idno in request("seltyid")
count=count+1
condition=condition+"id=" & idno
condition1=condition1+"reid=" & idno
if count<request("seltyid").count then
condition=condition+" or "
condition1=condition1+" or "
end if
next
set conna=opendba("oabusy","conna","accessdsn")
set rs=server.createobject("adodb.recordset")
sql="select * from xxx where " & condition1
rs.open sql,conna,1
while not rs.bof and not rs.eof
condition2=condition2+"senddateid=" & rs("id")
Response.redirect("list.asp")
%>

Answer 1

<!--#include file="conn.asp"-->
<%
if request("detel")="删除" and request("seltyid")<>"" then
count=0
condition=""蠢启铅
condition1=""
condition2=""
end if
for each idno in request("seltyid")
count=count+1
condition=condition+"id=" & idno
condition1=condition1+"reid=" & idno
if count<request("seltyid").count then
condition=condition+" or "
condition1=condition1+" or "
end if
next
set conna=opendba("oabusy","conna","accessdsn")
set rs=server.createobject("adodb.recordset")
sql="select * from xxx where "旁饥 & condition1
rs.open sql,conna,1
while not rs.bof and not rs.eof
condition2=condition2+"senddateid=" & rs("id")
//你用了while，所有后面带好需要关闭啊
wend
Response.redirect("list.asp")

%>