<%@ LANGUAGE=VBScript codepage ="936" %>
<!--#include file="../../const.asp"-->
<%
if zhbg_name="" then response.redirect "../../error.asp?id=440"
id=request("id")
if not isnumeric(id) then
	response.write "id请使用数字"
	response.end
end if
Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
conn.open Application("zhbg_usermdb")
conn.execute "delete * from letter where id="&id
set rs=nothing
conn.close
set conn=nothing
Response.Write "<script Language=Javascript>alert('提示：id为"&id&"的短信删除完成。');location.href = 'javascript:history.go(-1)';</script>"
response.end
%>

