当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP备份数据库

ASP
ASP+XML实例演练编程代码
asp下利用XMLHTTP 从其他页面获取数据的代码
asp下实现IP限制函数代码
asp下IP地址分段计算函数
asp身份证验证代码函数
用Asp隐藏文件路径,实现防盗链 的代码
ASP生成柱型体,折线图,饼图源代码提供了
用asp实现网址和邮件地址的转换函数
asp下最简洁的多重查询的解决方案
asp下用datediff实现计算两个时间差的函数
asp下实现记录集内随机取记录的代码
asp下轻松实现将上传图片到数据库的代码
[原创]站长感慨asp编程究竟何去何从
fso asp生成静态html的代码
ASP版实现cookies注入加速工具
ASP实现网页打开任何类型文件都提示保存的方法附代码
asp下使用数组存放数据的代码
一句话 asp木马加密版 彻底突破杀毒软件
asp清空application的方法
使用asp下的adodb.stream 下载文件而不是打开

ASP备份数据库


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 179 ::
收藏到网摘: n/a

       文件1:BackupDB.asp
  
  <%@ Language=VBScript %>
  <HTML>
  <HEAD>
  <META name=VI60_defaultClientScript content=VBScript>
  <META NAME="GENERATOR" Content="Microsoft FrontPage 4.0">
  <SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript>
  <!--
  
  Sub btnbak_onclick
  if frmbak.txtsvr.value="" then
  window.alert("'Server Name' is empty!")
  frmbak.txtsvr.focus
  exit sub
  end if
  if frmbak.txtuid.value="" then
  window.alert("'Administrators' is empty!")
  frmbak.txtuid.focus
  exit sub
  end if
  if frmbak.txtdb.value="" then
  window.alert("'Database' is empty!")
  frmbak.txtdb.focus
  exit sub
  end if
  if frmbak.txtto.value="" then
  window.alert("'Backup To' is empty!")
  frmbak.txtto.focus
  exit sub
  end if
  frmbak.submit
  End Sub
  
  -->
  </SCRIPT>
  <link rel="stylesheet" href="../../sheets/B2BStyle.css">
  </HEAD>
  <form action="backupdbsave.asp" method="post" id=frmbak name=frmbak>
  <body class="bg_frame_up">
  <p class=heading> Database --> Backup</p>
  <P align=center>
  <div align="center">
  <center>
  <table width="60%" cellpadding=1 cellspacing=1 border=0 align=center>
  <tr>
  <td class=TD_Mand_FN align="center" height="35" width="40%">Server Name:</td>
  <td class=TD_Mand_F height="35" width="59%">
  <INPUT id=txtsvr name=txtsvr size="20" style="font-family: Arial; font-size: 9pt"></td>
  </tr>
  <tr>
  <td class=TD_Mand_FN align="center" height="35" width="40%">Administrators:</td>
  <td class=TD_Mand_F height="35" width="59%">
  <INPUT id=txtuid name=txtuid size="20" style="font-family: Arial; font-size: 9pt"></td>
  </tr>
  <tr>
  <td class=TD_Mand_FN align="center" height="35" width="40%">Password:</td>
  <td class=TD_Mand_F height="35" width="59%">
  <INPUT id=txtpwd name=txtpwd type=password style="font-family: Arial; font-size: 9pt"></td>
  </tr>
  <tr>
  <td class=TD_Mand_FN align="center" height="35" width="40%">Database:</td>
  <td class=TD_Mand_F height="35" width="59%">
  <p align="left">
  <INPUT id=txtdb name=txtdb size="20" style="font-family: Arial; font-size: 9pt"></p>
  </td>
  </tr>
  
  <td class=TD_Mand_FN align="center" height="35" width="40%">Backup To:<br>
  <u>(Server Path)</u></td>
  <td class=TD_Mand_F height="35" width="59%">
  <input id=txtto name=txtto style="font-family: Arial; font-size: 9pt"></td>
  </tr>
  </table>
  </center> </div>
  <p align=center><input id=btnbak name=btnbak type=button value="Start Backup" style="font-family: Arial; font-size: 9pt"></p>
  </body>
  </form>
  </HTML>
  
  
  文件2:BackupDBSave.asp
  
  <%@ Language=VBScript %>
  <%
  dim msvr,muid,mpwd,mdb,mto
  msvr=Request.Form("txtsvr")
  muid=Request.Form("txtuid")
  mpwd=Request.Form("txtpwd")