📄 databackup.asp
字号:
<!--#include file="../inc/Secure.asp"-->
<%dim ThisKey
ThisKey = "y"
%>
<!--#include file="../inc/permission.asp"-->
<!--#include file="../inc/connection.asp"-->
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../css/main.css">
</HEAD>
<%
LoginID=Session("LoginID")
if LoginID="" then response.end
on error resume next
strDatabase="OA"
if request("cmd1")<>"" then
strName="/DataBackup/"&year(now())&month(now())&day(now())&"_all.bak"
sql="BACKUP DATABASE "&strDatabase&" TO DISK='"& Server.Mappath(strName) &"' WITH Format, Name='All_Data'"
Conn.execute sql
if err.number<>0 then
response.write "<p><font color=red>Error!!! 出现错误！可能是用户权限不够！<BR>"&err.description&"</font></p>"
else
response.write "<BR><p><font color=red>数据库完全备份完成！"& strName &"</font></p>"
end if
err.clear
end if
if request("cmd2")<>"" then
strName="/DataBackup/"&year(now())&month(now())&day(now())&"_dif.bak"
sql="BACKUP DATABASE "&strDatabase&" TO DISK='"& Server.Mappath(strName) &"' WITH DIFFERENTIAL, Name='DIF_Data'"
Conn.execute sql
if err.number<>0 then
response.write "<p><font color=red>Error!!! 出现错误！可能是用户权限不够！<BR>"&err.description&"</font></p>"
else
response.write "<BR><p><font color=red>数据库差异/增量备份完成！"& strName &"</font></p>"
end if
end if
%>
<BODY BGCOLOR="#FFFFFF">
<fieldset title="文件备份">
<legend align=center><font color=red class="pt11"><b>系统数据备份</b></font></legend>
<div style="word-break:break-all;font-size:12px;line-height:16px;padding:10px;">
您只需要点以下两个按扭就可以备份整个系统数据。<BR>
<p><font color=red>提醒：备份前请确定有一定的存储空间。建议使用完全备份！<BR>“完全备份系统数据”会将整个系统的数据作一次全面的备份，如果系统出了问题则可以马上恢复，<BR>“差异备份数据”则只备份最近一次备份以来发生过变动的数据！</font>
</p>
<form name="SearchForm" method="Post" action="">
<div align=center>
<table width="75%" border=0>
<tr>
<td><INPUT TYPE="submit" name="cmd1" value="完全备份系统数据" class="font9boldwhite"></td>
<td><INPUT TYPE="submit" name="cmd2" value="差异/增量备份数据" class="font9boldwhite"> </td>
</tr>
</table>
</div>
</form>
</div></fieldset>
</BODY>
</HTML>
<!--#include file="../inc/connclose.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -