del.asp

使用Asp+Access+FSO+Jmail+Servu开发

<!--#include file="../inc/conn.asp"-->
<%
user=request("user")
if request("user")="" or request("id")="" or Request.Cookies("username")<>user then
response.write"<script>alert('对不起，您没有权限执行此操作！');top.location.href='../login.asp'</script>"
response.end
end if   
if request("id")<>"" then
sql="select * from gbook where id="&cint(request("id"))
rs.open sql,conn,1,3
rs.delete
Response.redirect "index.asp?username="&user
end if
%>