del.asp

来自「嘉缘人才6.0精简 ,很好用的人才系统」· ASP 代码 · 共 24 行

<!--#include file="../../conn/conn.asp" -->
<!--#include file="../../Inc/Commoncode.asp" -->
<!--#include file="../checkvalid.asp" -->
<%
If Not FRAdminLevel(307) Then
	Call ErrorMsg()
End If
if Chkrequest(request("com_id")) then
com_id=request("com_id")
else
Response.Redirect ("../admin/admin_login.asp")
end if
if Chkrequest(request("pass")) then
pass=request("pass")
else
Response.Redirect ("../admin/admin_login.asp")
end if

sql="delete infocom where com_id="&com_id&""
conn.execute(sql)
conn.close
set conn=nothing
response.Redirect"infocom.asp?pass="&pass&""
%>