del.asp

汽车违法查询系统V0.1版本 1.直接解压上传空间就可使用！ 管理员admin 密码www.aoaoe.com 2.Conn.asp文件为数据库路径

<%if Session.Contents("master")="master" or Session.Contents("master")="admin" then%>
<!--#include file="conn.asp"-->
<%
dim id
id=Request("id")
If id="" Then
response.write "<script>alert('非法的请求');history.back()</script>"
Else
%>
<%

Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM 违法车辆 where id="+id
rs.Open sql,conn,3,2
%>
<%
if rs.bof and rs.eof then
response.write "<script>alert('错误的请求');history.back()</script>"
Else
rs.Delete
rs.Close
set rs=nothing
response.redirect "admin.asp"
end if
%>
<%end if%>
<%
Else
response.redirect "login.asp"
end if%>