📄 databak_admin.asp
字号:
<!--#include file="admin.asp"-->
<%
if request("menu")<>empty then
dababak=trim(request("dababak"))
bakfolder=server.MapPath(dababak)
select case request("menu")
case "bak"
chk_admin_login(1)
if not fso.FolderExists(bakfolder) then
fso.createfolder bakfolder
end if
Fso.CopyFolder server.MapPath(datapath)&datafolder,bakfolder
If Err Then
info= "程序出错,请联系管理员!"
Else
info= "<b>网站数据库已经成功备份！</b>"
end if
case "res"
chk_admin_login(3)
Fso.CopyFolder bakfolder,server.MapPath(datapath)
If Err Then
info= "程序出错,请联系管理员!"
Else
info= "<b>网站数据库已经成功恢复！</b>"
end if
end select
end if
%>
<html>
<head>
<title>注册用户管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/admin.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="70%" border="0" align="center" cellpadding="4" cellspacing="1" class="a2">
<tr class="a1">
<td height="25" align="center">数据库备份/恢复</td>
</tr> <form name="form1" method="post" action="" onSubmit="return confirm('确定要执行此操作吗？');">
<tr class="a3">
<td align="center">数据库路径:
<input name="dababak" type="text" id="dababak" value="databak" size="30">
</td>
</tr>
<tr class="a4">
<td align="center"><%if info="" then
Response.Write("请确定备份/恢复数据库的路径")
else
Response.Write info
end if%></td>
</tr>
<tr class="a3">
<td align="center"><input type="radio" name="menu" value="bak">
备份
<input type="radio" name="menu" value="res">
恢复</td>
</tr>
<tr class="a4">
<td align="center"><input type="submit" name="Submit" value=" 确 定 "> </td>
</tr></form>
</table>
<br>
<table width="70%" border="0" align="center" cellpadding="4" cellspacing="1" class="a2">
<tr class="a1">
<td height="25" align="center">压缩网站数据库</td>
</tr>
<form name="form" method="post" action="compact.asp" onSubmit="return confirm('确定要执行此操作吗？');">
<tr class="a3">
<td align="center">数据库路径:
<input name="dbpath" type="text" id="dbpath" value="<%=datapath&datafile%>" size="30">
</td>
</tr>
<tr class="a4">
<td align="center"><input type="submit" value=" 确 定 ">
</td>
</tr>
</form>
</table>
<br>
<table width="70%" border="0" align="center" cellpadding="4" cellspacing="1" class="a2">
<tr class="a1">
<td height="25" align="center">压缩FTP数据库</td>
</tr>
<form name="form" method="post" action="compact.asp" onSubmit="return confirm('确定要执行此操作吗？');">
<tr class="a3">
<td align="center">数据库路径:
<input name="dbpath" type="text" id="dbpath" value="<%=dbftp%>" size="30">
</td>
</tr>
<tr class="a4">
<td align="center"><input type="submit" value=" 确 定 ">
</td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -