<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/safe.asp"-->
<%
  Response.Buffer = true
  Response.ExpiresAbsolute=now()-1
  Response.Expires=0
  Response.CacheControl="no-cache"
%>
<%
if Not ChkPost then 
response.redirect ("../../login/chklogin.asp?login=4")
response.end
end if

if session("id")="" then
response.Redirect("../../login/login1.asp")
response.end
end if
%>
<%
if Chkrequest(request("id")) then
id=request("id")
else
Response.Redirect ("../../login/chklogin.asp?login=4")
end if
dim rs,sql

sql="delete from [getprice] where id="&id&""
conn.execute sql
if err.Number<>0 then
err.clear
response.write "刪 除 失 敗 !<br>"
else
Response.Redirect ("receivemessagelist.asp")
end if
%>
<%

conn.close
set conn=nothing
%>