www.gusucode.com > ASP+ACCESS在线教育系统设计(源代码+论文) > ASP+ACCESS在线教育系统设计(源代码+论文)\王智_在线教育系统\teacher\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
%>