ASP下批量删除数据的两种方法

id=request.form("checkbox")
id=Split(id,",")
shu=0
for i=0 to UBound(id)
sql="select * from jiang_fname where id="&id(i)
set rs=conn.execute(sql)
if not rs.eof then
delete_file(rs("fname"))
end if
rs.close
set rs=nothing
sql="delete from jiang_fname where id="&id(i)
conn.execute sql,shu1
shu=shu+1
next

if shu>0 then
response.Write("")
else
response.write("")
end if
conn.close
set conn=nothing

<%'数据库的连接文件我就不多说了%>








<%
set rs=server.createobject("adodb.recordset")
sql="select * from news order by addtime desc"
rs.open sql,conn,1,3 %>
<% if rs.eof then %>

没有新闻！

<% else %>

<%end if%>

<% do while not rs.eof %> 　　 <% rs.movenext loop %> 　　 新闻管理中心 删除框 新闻标题 发布时间 管理 " ID="Checkbox1"> <%If Len(rs("title"))<=30 Then%><%=rs("title")%><%else%> <%=(Left(rs("title"),30))%>... <%end if %> <%=rs("addtime")%> ">编　辑 选中所有的显示新闻

<% set rs=nothing
conn.close
set conn=nothing
%>

<%
arrdel=Request("id")
'Response.Write arrdel
sql="delete from news where id in ("&arrdel&")"
'Response.Write sql
conn.Execute sql
set conn=nothing
response.write""
response.end
%>