delbookmark.asp

这是一个非常好的留言版程序

<!--#include file="conn.asp"-->
<!--#include file="include/setup.asp"-->
<% 
ID=Trim(Request.QueryString("id"))
From=Trim(Request.QueryString("from"))
set rsdel=server.createobject("ADODB.recordset")

Application.Lock()
rsdel.Open "select * from bookmark where UserID='"&UserID&"'and id="&ID,conn,3,3
if rsdel.eof then
	response.write"<SCRIPT language=JavaScript>alert('对不起，请不要非法删除她人的数据，您的IP已被我们记录，请返回！');"
	response.write"javascript:history.go(-1);</SCRIPT>"
	response.end
end if
rsdel.delete
rsdel.update
rsdel.close
Application.UnLock()

Response.Redirect(From)
%>