del_message.asp

来自「免费实用家教网整站程序(奥运特别版) v1.5」· ASP 代码 · 共 19 行

<!--#include file="conn.asp"-->
<%
if Request.Cookies("id")="" or Request.Cookies("ac")="" or Request.Cookies("user")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('您还未登陆！');"&"window.location.href = 'index.asp'"&" </script>"
Response.End
end if
if request("id")="all" then
sql="DELETE FROM message WHERE tid="&Request.Cookies("id")&" and ttype='"&Request.Cookies("user")&"'"
else
sql="DELETE FROM message WHERE id="&clng(request("id"))&"and tid="&Request.Cookies("id")&" and ttype='"&Request.Cookies("user")&"'"
end if
rs.Open sql,conn,1,1
set rs=nothing
set conn=nothing
Response.Cookies("newinfo")=""
response.write "<script language=JavaScript>" & chr(13) & "alert('删除成功,即将返回！');"&"window.location.href = 'message.asp'"&" </script>"

%>