delmessage.asp

问卷答疑系统提供个工具欢迎大家交流免费使用

<%if session("iamcoming")<>"" then%>
<!--#include file="conn.asp"-->
<%
IID=request("id")
dim sql
dim rs
set rs=server.createobject("adodb.recordset")
sql = "DELETE FROM table_dayi WHERE id="+IID
rs.Open sql,conn,1,1
set rs=nothing
response.write "<script language=JavaScript>" & chr(13) & "alert('已经删除！');"&"window.location.href = 'all.asp'"&" </script>" 
%>
<%
else
 response.write "<script language=javascript>"
 response.write "alert('管理员操作超 时..........');"
 response.write "javascript:history.go(-1)"
 response.write "</script>"
end if%>