delete1.asp

来自「多用户个人主页系统(ASP)」· ASP 代码 · 共 21 行

<%
response.buffer=true
response.expires=0%>
<!--#include file="./includes/dataconn.inc"-->
<!--#include file="./includes/setup.asp"-->
<%
if adminlogin=session("username") and adminpassword=session("password") then sql="delete from user where regdate<=" & FormatDateTime(DateAdd("d",-3, date()),1) & " and enddate=" & FormatDateTime(cdate("01-01-2004"),1) & " and kt='否'"
response.write sql
conntemp.execute(sql)
else     
%>     
<script language="vbs">     
<!--     
MsgBox "请不要使用非法路径进入!",,"宏网"     
window.location.href="index.asp"    
-->     
</script>     
<%
end if     
response.redirect("nokt.asp")
%>