📄 clear_step3.asp
字号:
<%@ CODEPAGE = "936" %>
<%
'=================================
'
' 阿江酷站访问统计系统
' Ajiang info@ajiang.net
' www.ajiang.net
'
' 版权所有·抄袭挪用必究
'
'=================================
%>
<!--#include file="inc_config.asp"-->
<%
'权限检查
if session.Contents("master") <> true then Response.Redirect "help.asp?error=你不是管理员，无权进入本页面。"
offtime =request("offtime")
force =Request("force")
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath(connpath)
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
if force="1" then
conn.execute("delete * from view where vtime<datevalue('" & offtime & "')")
else
conn.Execute("delete * from view where vtime<datevalue('" & offtime & "') and bakdays=1 and bakstats=1 and bakpage=1")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Copyright" content="Ajiang http://www.ajiang.net">
<title><%=countname%>－数据清理－第三步－清理</title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body topmargin=5 rightmargin=0 leftmargin=0 vlink=#000000><!--#include file="inc_top.asp"-->
<br>
<table width="500" cellspacing="0" align="center" cellpadding="0" border="0">
<tr><td colspan="3"><IMG src="images/photoup.gif"></td></tr>
<tr height="30">
<td width="1" class="backs"></td>
<td width="498" class="backq">
<IMG src="images/tb_title.gif" align=absMiddle> ∷∷∷ 数据清理－第三步 □ 清理指定记录 ∷∷∷<br>
<table width="90%" align=center><tr>
<td>
<p class="p1">已经完成了数据清理。建议对数据库进行压缩，否则可能原来占用的空间并不能释放。
<p class="p1">数据压缩需要您的主机有足够的剩余空间，剩余空间的大小应该足够放置压缩后的数据库文件，一般应该是1～5M。如果您的主机没有足够的空间，就必须先清理一下主机上的文件，留出空间。
<p class="p1" align="right"><a href='clear_step4.asp'>下一步 压缩数据库</a> <a href='clear_step4.asp' target="_parent"><img src="images/arbutton.gif" align="absmiddle" border="0"></a> <font style="font-size:16px"> </font>
</td></tr></table>
</td>
<td width="1" class="backs"></td>
</tr>
<tr><td colspan="4"><IMG src="images/photodown.gif"></td></tr>
</table>
<br><!--#include file="inc_bottom.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -