del.asp

来自「电子商务系统Easy_Buy是一个在线销售系统」· ASP 代码 · 共 12 行

<!--#include file="../login/0.asp"-->
<!--#include file="../../conn/conn.asp"-->
<%Set s= Server.CreateObject("abodb.recordset")
Select case request("del")
   case "b"
       conn.execute("Delete guestbook where datediff(d,sj,getdate())>"&Request("sj")&"")
        Response.write "<script>alert(""删除成功"");location.href=""guanli.asp"";</script>"
   case "a"
       conn.execute("Delete guestbook where id="&Request("id")&"")
        Response.write "<script>alert(""删除成功"");location.href=""guanli.asp"";</script>"
End Select
%>