| 欢迎<%=session("mastername")%>进入管理页面
|
>
|
<%call leftmenu()%>
|
>
|
备份论坛数据 | 感谢ra88(barnett@263.net)整理制作( 需要FSO支持,FSO相关帮助请看微软网站 )
|
<%
fsoflag=1
if fsoflag="1" then
dim method
method=request.querystring("method")
if method="" then
%>
<%
elseif method="Backup" then
Dbpath=request.form("Dbpath")
Dbpath=server.mappath(Dbpath)
Set Fso=server.createobject("scripting.filesystemobject")
if fso.fileexists(dbpath) then
REM 修改本行中的dvbbs5_backup.mdb文件名为您需要的备份文件名
fso.copyfile dbpath,left(dbpath,instrrev(dbpath,"\",(instrrev(dbpath,"\")-1)))&"DataBackup\dvbbs5_Backup.MDB"
response.write "| 成功备份数据 | "
else
response.write "| 找不到您所需要备份的文件 | "
end if
end if
else
%>
|
本项功能已经被管理员关闭
|
<%end if%>
|
<%
end IF
%> |