📄 admin_bf_shu.asp
字号:
<%
if request.Cookies("user")<>"管理员" then
response.Write("未知来源！请先登陆！")
response.End()
end if
%>
<%
select case Request("menu")
case "bakbf"
set MyFileObject=Server.CreateOBject("Scripting.FileSystemObject")
MyFileObject.CopyFile ""&Server.MapPath("mdbconn\stu.mdb")&"",""&Server.MapPath(Request("yl"))&""
set MyFileObject= nothing
response.write "<script language=JavaScript>{window.alert('数据库成功备份！');window.location.href='admin_bf_shu.asp'}</script>"
response.End()
end select
%>
<html><head><title></title><base onmouseover="window.status='欢迎使用有L.Y.Z开发的学生社团管理网络平台';return true"><LINK href="all.css" rel=StyleSheet type=text/css></head><body>
<table width="100%" border="1" cellspacing="0" bordercolor="#009900">
<tr bgcolor="#B1DB99">
<td colspan="2">备份数据库:</td>
</tr>
<tr bgcolor="#E7FDE3">
<td width="20%">原来数据库路径:</td>
<td width="80%">mdbconn\stu.mdb</td>
</tr><form action=?menu=bakbf method="POST">
<tr bgcolor="#E7FDE3">
<td>备份数据库路径:</td>
<td><input name="yl" type="text" value="bf\bfstu.mdb" size="20" maxlength="20">
默认: bf\bfstu.mdb <font color="#FF0000">注意:所放文件夹必须存在</font></td>
</tr>
<tr bgcolor="#cbe6b9">
<td colspan="2" align="center"><input type="submit" name="Submit" value="备份数据库" onclick=" window.location='admin_zhl_shuok.asp'" style="font-family: 新细明体, 宋体, Arial; font-size: 9pt; height:20px;background-color:#D4D0C8;" onMouseOver ="this.style.backgroundColor='#FFC864'" onMouseOut ="this.style.backgroundColor='#D4D0C8'"></td>
</tr></form>
</table>
</body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -