problemdelete.asp

系统结合实际需求

<%@ Language=VBScript %>
<%
	strpage = Request.Form("page")
	count = request.form("id").count
	sql1 = "DELETE FROM problems WHERE id = "
	
	set conn = server.CreateObject("adodb.connection")
	conn.Open Application("dsn")
	for i = 1 to count 
		conn.Execute sql1 & request.form("id")(i)
		'Response.Write sql1 & request.form("id")(i)
	next
	
	conn.close
	set conn = nothing
	
	response.redirect "problemadmin.asp?page="&strpage
%>