delbadword.asp

来自「电子商务网络购物系统」· ASP 代码 · 共 14 行

<% Option Explicit %>
<!--#include file="conn.asp" -->
<%
Dim iaryBadWordID
For each iaryBadWordID in Request.Form("chkWordID")
	strSQL = "DELETE FROM timesword WHERE (wordid ="  & CInt(iaryBadWordID) & ");"
	adoCon.Execute(strSQL)	
Next
Set rsConn = Nothing
adoCon.Close
Set adoCon = Nothing
Response.Redirect "badwordcfg.asp"
%>