<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Include/checklogin.asp" -->
<!--#include file="Include/connect.asp" -->
<%
MessageID=request.querystring("messageid")
page=request.querystring("page")
if page="" then
page=1
end if
set rs = server.CreateObject("adodb.recordset")
sql="select * from Show5_ALLMessage where MessageID="&messageid&""
rs.open sql,cn,1,1

cn.execute ("delete from Show5_ALLMessage where MessageID='"&MessageID&"'")
rs.close
set rs=nothing
Response.write("<script>alert('³ΙΉ¦ΙΎ³ύΑτΡΤ£‘');window.location.replace('m_message.asp?page="&page&"');</script>")
%>