📄 sort_del.asp
字号:
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/Config.asp"-->
<%
Dim Language
Language=formatStr(Request("Language"))
if Language="" then Language="C"
if Language="C" then
table="hfrom"
zid="hf_id"
ziduan="hf_name"
ziduan2="h_from"
elseif Language="E" then
table="hto"
zid="ht_id"
ziduan="ht_name"
ziduan2="h_to"
else
table="harea"
zid="ha_id"
ziduan="ha_name"
ziduan2="h_area"
end if
id=Request("delid")
If id="" then Check_Alert "非法操作","Sort_admin.asp"
set rspro=server.CreateObject("adodb.recordset")
rspro.open"select * from houyun where "&ziduan2&"="&id,conn,1,3
if not rspro.eof then
check_alert "此分类下面还有路线,请先把路线删掉",request.ServerVariables("HTTP_REFERER")
else
conn.execute("delete from "&table&" where "&zid&" in("&id&")")
check_alert "删除成功!","Sort_Admin.asp?Language="&Language
end if
rspro.close
set rspro=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -