dele.asp

这个就是受到众人喜爱的许愿墙了

<!--#include file="Conn.asp"-->
<%
if Session("isAdmin")<>true Then
    Response.Write "<script>location.href='adminlogin.asp';</script>"
    Response.End
End if
%>
<%
HopeID=request("HopeID")
if HopeID="" then
    response.write "<script>alert('参数错误');history.go(-1);</script>"
    response.end
else
    sql="delete from love where HopeID in ("& HopeID &")"
    set rs=server.CreateObject("ADODB.RecordSet")
    rs.open sql,conn,1,3
    response.write "<script>alert('删除成功');history.go(-1);</script>"
end if
%>