del_shjia.asp

闲置物品免费交易的平台

<!--#include file=conn.asp-->
<meta http-equiv="Content-Language" content="zh-cn">
<%
if session("admin")="" then
response.Write "<script LANGUAGE='javascript'>alert('网络超时或者您还没有登录请登录');window.location.href='login.asp';</script>"
response.End
else
if session("flag")>2 then
response.Write "<p align=center><font color=red>您没有此项目管理权限！</font></p>"
response.End
end if
end if
dim rs1,sql1,shjiaid
shjiaid=request.QueryString("id")
set rs1=server.createobject("adodb.recordset")
sql1="delete from [shjia] where shjiaid="&shjiaid
rs1.open sql1,conn,1,3
response.Write "<script language='javascript'>alert('商家成功删除了！');history.go(-1);</script>"
conn.close
set conn=nothing
%><p align="center"><a href="manageshjia.asp">返回</a></p>