sk_crm_client_del.asp

来自「为你节约成本,让你的企业在信息时代助上一臂之力!!! 真正做到无纸办公,全自动」· ASP 代码 · 共 33 行

<% @language="vbscript" %>
<!--#include file="conn.asp" -->  
<% 
if session("name")="" or session("dd")=""  or int(dd)<>int(SK_mclass) then
Response.Write("<script>alert(""非法登陆，请确认密码的正确性！\n或者已经被管理员锁定！"");history.back();</script>")
response.end
end if
if session("quanxian")="1"  then
Response.Write("<script>alert(""对不起,你的权限不够！"");history.back();</script>")
response.end
end if

response.buffer=true
Response.Expires=0

id=replace(trim(request("ID")),"'","''")
if ID>"" then
conn.execute("delete from SK_customer where id in("&id&")")
conn.execute("delete from SK_cust_user where cust_s in("&id&")")
conn.execute("delete from SK_Follow where cust_s in("&id&")")
else
Response.Write("<script>alert(""对不起,错误的参数ID！"");history.back();</script>")
response.end
end if
conn.close
set conn=nothing
%>

<%
Response.Write("<script>alert(""恭喜你,删除客户行业成功！"");</script>")
response.Redirect "SK_CRM_client_list.asp?SK_mclass=78&s=1"
response.end
%>