⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 delolduser.asp

📁 网络棋牌服务端简单的聊天程序界面
💻 ASP
字号:
<!--#include file="../inc/conn.asp"-->
<%
 if session("chat_admin")<>"yes" then
  response.redirect "login.asp"
  response.end
 end if
olddate=request("olddate")
candel=request("candel")
if olddate="" then
 olddate="30"
end if
iolddate=cint(olddate)
nowdate=now()-iolddate
usernum=0
Conn = DBCN()
set rs = Server.CreateObject("ADODB.Recordset")
if candel="yes" then
  sql="delete from [user] where lastactivity<#" & cstr(nowdate) & "#"
  'sql="delete from [user] where lastactivity<'" & cstr(nowdate) & "'"
  conn.execute(sql)
else
 sql="select count(*) from [user] where lastactivity<#" & cstr(nowdate) & "#"
 'sql="select count(*) from [user] where lastactivity<'" & cstr(nowdate) & "'"
 rs.open sql,conn,3
 usernum=rs(0)
 rs.close
end if
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>删除过期用户帐号</title>
<style type="text/css">
<!--
.p9 {font-size: 10pt; line-height: 14pt }
-->
</style>
</head>
<body topmargin="3" leftmargin="3">
<table border="0" width="100%" bgcolor="#C8C9D2">
  <tr>
    <td width="52%"><a href="index.asp">系统管理首页</a>-><strong>删除过期用户帐号</strong></td>
    <td width="48%">
      <p align="right" class="p9"><a href="logout.asp"><font color=red>退出系统</font></a>&nbsp;&nbsp; <a href="http://www.easyfad.com">技术支持</a>&nbsp;&nbsp; <a href="http://www.jchat.com.cn">关于JChat</a></td>
  </tr>
</table>
<table border="0" width="100%" height="85%" bgcolor="#E7E7EB">
  <tr>
    <td width="100%" class="p9" valign="top"><br>
<%
if candel="yes" then
  response.write "删除<font color=#ff0000>" & olddate &"</font>天没有登录过的过期帐号完成。<a href=""index.asp"">返回</a>"
else
  response.write "你确定要删除<font color=#ff0000>" & olddate & "</font>天没有登录过的,共<font color=#ff0000>" & usernum &"</font>个过期帐号吗?<br>"
  response.write "<form action=""delolduser.asp"">"
  response.write "<input type=hidden value=""" & olddate & """ name=""olddate"">"
  response.write "<input type=hidden value=""yes"" name=""candel"">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type=submit value=确定删除>&nbsp;&nbsp;&nbsp;&nbsp;<input type=button value=取消返回 onclick=""history.back(0)"">"
  response.write "</form>"
end if
%>
 </td>
  </tr>
</table>
<table border="0" width="100%" bgcolor="#C8C9D2">
  <tr>
    <td width="100%" class="p9">
      <p align="right">版本:<font color="#FF0000">JChat V3.7.0</font>&nbsp;&nbsp;</p> 
    </td> 
  </tr> 
</table> 

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -