?? admin_data.asp
字號:
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="format.asp"-->
<!--#include file="error.asp"-->
<!--#include file="body/incjs.asp"-->
<!--#include file="body/adminmenu.asp"-->
<!--#include file="body/foot.asp"-->
<script language="javascript">
if(top.frames.length == 0)
{
document.location = "login.asp";
}
else
{
if(parent.ryan_bar)
{
}
else
{
parent.location = "login.asp";
}
}
</script>
<%
function fsodbback()
on error resume next
dim obj_fso,backdbpath
backdbpath=server.mappath(backdbdir & "/bak_"&right(server.mappath(dbpath),len(server.mappath(dbpath))-instrRev(server.mappath(dbpath),"\")))
set obj_fso=server.createobject("scripting.filesystemobject")
obj_fso.copyfile server.mappath(dbpath),backdbpath,true
set obj_fso=nothing
if err.number<>0 then
fsodbback="<font color="&colors(12)&"><b>備份失敗,請確保服務器支持FSO,且 "&backdbdir&" 目錄可寫!</b></font>"
else
fsodbback="<font color="&colors(12)&"><b>備份數據庫成功,數據庫已成功備份到 "&backdbdir&" 目錄中!</b></font>"
end if
end function
function compactdb()
on error resume next
dim obj_fso,obj_engine,temppath
temppath = server.mappath(backdbdir & "/temp_compactdb.tmp")
Set obj_fso = Server.CreateObject("Scripting.FileSystemObject")
Set obj_engine = CreateObject("JRO.JetEngine")
obj_engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath(dbpath) ,"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & temppath
obj_fso.CopyFile temppath,server.mappath(dbpath),true
obj_fso.DeleteFile temppath,true
Set obj_engine = nothing
if Err.Number <>0 then
response.write "<font color="&colors(12)&"><b>壓縮失敗,可能你的服務器不支持FSO或JRO組件</b></font>"
else
response.write "<font color="&colors(12)&"><b>壓縮網站數據庫成功!</b></font>"
end if
set obj_fso=nothing
end function
%>
<!--#include file="body/admintop.asp"-->
<table width="<%=tablewidth%>" align="center" cellpadding=0 cellspacing=0 bgcolor="#FFFFFF" style="border-top:0px;">
<tr>
<td width="205" valign="top" class="line"><%call adminmenu()%></td>
<td valign="top" class="linee" width="565" style="text-align:center"><br><br><br>
<table width="80%" border="1" cellspacing="0" cellpadding="4" bordercolor="#09DD77" style="border-collapse: collapse">
<tr >
<td background="images/dh.gif"><font color="#000000">網站數據庫備份</font></td>
</tr>
<tr>
<td><font color="#ff0000"><b>說明:</b></font><br> 本操作將備份網站數據庫到網站所在目錄的 databackup 子目錄中,必要時可進行恢復。但仍推薦將數據庫備份到本地硬盤上。<br><br><font color="#ff0000"><b>注意:</b></font>本次操作需要服務器支持FSO才能順利完成!</td>
</tr>
<%if request.form("act")="backupdb" then%>
<%=fsodbback()%>
<%else%>
<tr >
<td align="center">
<form method="post" action="<%=selfname%>" onsubmit="if(confirm('你現在就要備份網站數據庫嗎?')){return true}else{return false}"><input type="hidden" name="act" value="backupdb"><input type="submit" value="備份數據庫" style="width:96px" class="button"></form></td>
</tr><%end if%>
</table><br><br><br>
<table width="80%" border="1" cellspacing="0" cellpadding="4" bordercolor="#09DD77" style="border-collapse: collapse">
<tr>
<td background="images/dh.gif"><font color="#000000">網站數據庫壓縮</font></td>
</tr>
<tr>
<td><font color="#ff0000"><b>說明:</b></font><br> 本操作將在線壓縮網站數據庫,且是一個相對較慢的過程。為保證安全,執行本操作前請一定先<b>備份</b>好你的數據庫。<font color="#ff0000">強烈建議在網站訪問量小的時段壓縮數據庫!</font><br><br><font color="#ff0000"><b>注意:</b></font><br> 1。本操作需服務器支持FSO、JRO組件才能順利完成!<br> 2。壓縮所需時間視數據庫大小而定,可能在0.1秒-10秒之間</td>
</tr>
<%if request.form("act")="compactdb" then%>
<%=compactdb()%>
<%else%>
<tr>
<td align="center">
<form method="post" action="<%=selfname%>" onsubmit="if(confirm('建議在訪問量不大時壓縮數據庫。是否繼續?')){return true}else{return false}"><input type="hidden" name="act" value="compactdb"><input type="submit" value="壓縮數據庫" style="width:96px" class="button"></form></td>
</tr><%end if%>
</table><br><br><br>
</td>
</tr>
</table>
<%call endpage()%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -