delbuy01ji.ASP
上传用户:qyswxdl
上传日期:2013-06-01
资源大小:1373k
文件大小:1k
源码类别:

家庭/个人应用

开发平台:

ASP/ASPX

  1. <!--#include file="articleconn.asp"-->
  2. <!--#include file="security.asp"-->
  3. <%if session("flag")>2 then
  4.     response.write "<br><p align=center>您的操作权限不够!</p>"
  5.     response.end
  6. end if
  7. %>
  8. <%   
  9. date01=Replace(request("date03"), "'", "''")
  10. date02=Replace(request("date04"), "'", "''")
  11. delid=Replace(request("delid"), "'", "''")
  12. if date01="" and date02="" and delid="" then
  13.    conn.execute "delete from buy WHERE baoyue=0 and now()-datetime >=2 and pay=0"
  14.    conn.close
  15.    set conn=nothing
  16.    else if delid<>"" then
  17. conn.execute "delete from buy WHERE baoyue=0 and giveme='在线支付' and pay=0"
  18.    conn.close
  19.    else if date01<>"" and date02<>"" then
  20.     conn.execute "delete from buy WHERE baoyue=0 and pay=0 and datetime>='"&date01&"' and datetime<='"&date02&"' "
  21.   conn.close
  22.    set conn=nothing
  23.    end if
  24.    end if
  25.    end if
  26.    response.redirect Request.ServerVariables("HTTP_REFERER")
  27. %>