del.asp

天创商务网客户资源管理系统 v1,asp+Access,iis5

<%
if session("fishinfire") = "" then
	Response.Redirect "login.asp"
	Response.End
end if
%>
<!--#include file="conn.asp"-->
<%
if request.form("coun")="" then
response.write"<script>alert(""当前没有留言可以删除"");history.back();</script>"
else
coun=cint(request.form("coun"))

for i=1 to coun step 1
	if request.form("sel"&i) = "on" then
		tid=request.form("id"&i)
		delsql="delete from guestbook where id="&tid
		'response.write(delsql)
		conn.execute(delsql)
	end if
next
end if
conn.close
   response.redirect"adminedit.asp"
%>