?? clear_step1.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=你不是管理員，無權進入本頁面。"
%>
<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">
<form action="clear_step2.asp">
<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"><SCRIPT type="text/javascript" src="http://bar.baidu.com/ad/popprg.js"></SCRIPT>
<SCRIPT language="JavaScript">
<!--
BaiduWriteAD("zouwenyedg","3");
//-->
</SCRIPT> <img src= http://un.baidu.com/images/st.gif?tn=zouwenye width=0 height=0>
<img src="images/tb_title.gif" align=absmiddle> ∷∷∷ 數據清理－第一步 □ 準備 ∷∷∷<br>
<table width="90%" align=center><tr><td>
<p class="p1">清理數據的步驟是這樣的，首先系統按照你的要求清除主訪問信息庫中相應的記錄，然后提示你使用數據庫壓縮工具對庫文件進行壓縮。
<p class="p1">1、在對數據庫進行清理之前，請你確認你已經將你要清理的數據備份，并且你已經確認你不需要再在統計報告和自定義統計中使用這些信息了，因為這種清理是無法恢復的。
<p class="p1">2、如果您的服務器上沒有安裝FSO組件，程序就無法用壓縮過的數據庫覆蓋原來的數據庫，也無法刪除臨時的文件。你就必須準備好FTP軟件等可以控制您的系統的其他辦法，在清理完成后完成文件的更名。（<%
if IsObjInstalled("Scripting.FileSystemObject") then
%>您的空間支持FSO。<%
else%><font color=red>你的空間不支持FSO！<%end if%>）
<p class="p1"><font color=red>注意：</font>數據一旦從主訪問記錄庫中清理出去，就無法在任何統計報告中看到這些記錄，就是說不僅僅是在“詳細記錄”中看不到，而是在所有的統計報告中都看不到，自定義統計功能也無法查詢到被清理掉的部分。使用“后備庫查看器”可以查看被備份過的數據，但是功能很有限，所以應該在保證程序正常運行的情況下，保留盡量多的詳細記錄。（目前后備庫查看器尚未完成）</p>
<p class="p1">準備好以后，請輸入要清理的數據的條件并點擊開始。
<%if Request("offtime")<>"" then%>
<p class="p1">清理 <input name="offyear" class="input" size="5" value="<%=year(Request("offtime"))%>"> 年
<input name="offmonth" class="input" size="3" value="<%=month(Request("offtime"))%>"> 月
<input name="offday" class="input" size="3" value="<%=day(Request("offtime"))%>"> 日前的數據。<INPUT type="checkbox" name=force value=1>是否強制清理
<%else%>
<p class="p1">清理 <input name="offyear" class="input" size="5"> 年
<input name="offmonth" class="input" size="3"> 月
<input name="offday" class="input" size="3"> 日前的數據。<INPUT type="checkbox" name=force value=1>是否強制清理
<%end if%>
<p class="p1">注意：當選擇了“強制清理”時，沒有備份過的數據也將被清理，請慎用。建議此選項僅在數據庫已經出錯無法備份的情況下使用。
<p class="p1" align="right"><a href='javascript:document.forms[0].submit();'>下一步 清理數據 開始</a> <input type="submit" name="bakgo" class="backc2" value=" "><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>
</form>
</table>
<br>
<!--#include file="inc_bottom.asp"-->
</body>
</html>
<%
'組件檢查函數
Function IsObjInstalled(strClassString)
On Error Resume Next
IsObjInstalled = False
Err = 0
Dim xTestObj
Set xTestObj = Server.CreateObject(strClassString)
If 0 = Err Then IsObjInstalled = True
Set xTestObj = Nothing
Err = 0
End Function
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -