📄 backup.asp

📁 一个电子商务网站完整代码,在.net平台下开发

💻 ASP

字号:

<%@language="vbscript" CODEPAGE="936"%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link >
<title>Access数据备份</title><BODY>
<link>
<% 
   if Request.QueryString("action")="login" then
	cff=request.form("cff")
	cff=server.mappath(cff)
	loginf=request.form("loginf")
	loginf=server.mappath(loginf)
	loginfy=request.form("loginfy")
	Set scofso = Server.CreateObject("Scripting.FileSystemObject")
	'判断所要备份的数据库是否存在，如果不存在则给予提示；
	if scofso.fileexists(cff) then
	if err then 
	err.clear
	response.write "<div class=tdc>不能建立fso对象，请确保空间支持fso:！"
	response.end
	end if
	if scofso.Folderexists(loginf) then
	else
	Set fy=scofso.CreateFolder(loginf)
	end if
	scofso.copyfile cff,loginf& "\"& loginfy
	response.write "<div class=tdc>备份数据库成功，您的数据库备份路径为" &loginf& "\"& loginfy&"</div>"
	response.end
	else
	response.write "<script language=javascript>alert('所要备份的数据库不存在');history.login(-1);</script>"
	response.end
	end if 
	end if 
%>

<form name="form1" method="POST" action="backup.asp?action=login">
<div align="center">
<center>
<br>
<table border="1" cellpadding="5"   bgcolor="#FF99FF"  width="69%" id="AutoNumber1" cellspacing="0">
<tr> 
<td width="100%" height="25"><div align="center"><span class="style1">备份数据库</span></div></td>
</tr>
<tr>

</tr>
<tr>
<td width="100%" bgcolor="#FBFDFF"><p>数据库路径：&nbsp;&nbsp;&nbsp; <span style="loginground-color: #F7FFF7"> 
      <input name="cff" type="text" class="text" value="database/#MeiziShop.mdb" size="30">
      </span>&nbsp;</p>
  <p> 备份数据目录：&nbsp;
        <span style="loginground-color: #F7FFF7"> 
        <input name="loginf" type="text" class="text" value="dblogin" size="20">
          </span></p></td>
</tr>
<tr>
<td width="100%" bgcolor="#FBFDFF">数据库名称：&nbsp;&nbsp;&nbsp;<span style="loginground-color: #F7FFF7"> 
<input name="loginfy" type="text" class="text" value="dbdackup.mdb" size="20">
&nbsp; 
<input type="submit" name="Submit" value="备份" >
<input type="reset" name="Submit2" value="重置" > </span> 
</td>
</tr>
</table>
</center>
</div>
</form>
<!--#include file="footer.asp"-->

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -