admin_pinglunlistdel.asp

功能强大 首发! 演示地址:http://jsice.com QQ:3300828 运行环境： Internet Information Server 5.x or 6.0 （ii

<!-- #include file="../conn.asp" -->
<!-- #include file="session.asp" --><!--#include file="../inc/config.asp"-->
<%
id=trim(request("checked"))
If ID="" Then
	Response.Write ("<SCRIPT language=JavaScript>alert('错误!\n\n您至少需要选择一个');javascript:window.close();</SCRIPT>")
	Response.end
End If
viewArray=Split(ID, ",")
Num = UBound(viewArray)
For i=0 To Num
conn.execute "delete from [Comment] where CommentID in ("&viewArray(i)&") "
Next
response.write ("<script>opener.location.reload();</script><script language=javascript>window.alert('删除成功!');javascript:window.close();</script>")
%>