asp备份,还原SQL数据库--非常好用.--2006-6-8-5

转载 2006年06月08日 19:59:00
<form method="post" name="myform" action="?action=backupdatabase">
  选择操作:
  <input type="radio" name="act" id="act_backup"value="backup">
  <label for=act_backup>备份</label>
  <input type="radio" name="act" id="act_restore" value="restore">
  <label for=act_restore>恢复</label>
  <br>
  数据库名:
  <input type="text" name="databasename" value="<%=request("databasename")%>">
  <br>
  文件路径:
  <input type="text" name="bak_file" value="c:/$1.bak">
  (备份或恢复的文件路径)<br>
  <input type="submit" value="确定" id=submit1 name=submit1>
</form>
<%
'sql server 数据库的备份与恢复!
if request("action")="backupdatabase" then
 dim sqlserver,sqlname,sqlpassword,sqllogintimeout,databasename,bak_file,act
 '**************************************************************************
 sqlserver = "127.0.0.1"
 sqlname = "sa "
 sqlpassword ="111"
 sqllogintimeout = 15
 databasename = trim(request("databasename"))
 bak_file = trim(request("bak_file"))
 bak_file = replace(bak_file,"$1",databasename)
 act = lcase(request("act"))
 '**************************************************************************
 if databasename = "" then
  response.write "input database name"
 else
  if act = "backup" then
   set srv=server.createobject("sqldmo.sqlserver")
   srv.logintimeout = sqllogintimeout
   srv.connect sqlserver,sqlname, sqlpassword
   set bak = server.createobject("sqldmo.backup")
   bak.database=databasename
   bak.devices=files
   bak.action   = 0
   bak.initialize   = 1
   'bak.replace        = true
   bak.files=bak_file
   bak.sqlbackup srv
    if err.number>0 then
     response.write err.number&"<font color=red><br>"
     response.write err.description&"</font>"
    end if
  response.write "<font color=green>备份成功!</font>"
  end if
  
  if act="restore" then
  '恢复时要在没有使用数据库时进行!
   set srv=server.createobject("sqldmo.sqlserver")
   srv.logintimeout = sqllogintimeout
   srv.connect sqlserver,sqlname, sqlpassword
   set rest=server.createobject("sqldmo.restore")
   rest.action=0 ' full db restore
   rest.database=databasename
   rest.devices=files
   rest.files=bak_file
   rest.replacedatabase=true 'force restore over existing database
    if err.number>0 then
     response.write err.number&"<font color=red><br>"
     response.write err.description&"</font>"
    end if
   rest.sqlrestore srv
   response.write "<font color=green>恢复成功!</font>"
  else
   response.write "<font color=red>没有选择操作</font>"
  end if
 end if
end if
%>

相关文章推荐

发现非常好用的js插件 让IE6支持css3,让 IE7、IE8 都支持CSS3

但凡是前端工程师,都知道IE6,IE7,IE8不支持、或者不完全支持CSS3的属性。CSS3 有很多很强大、绚丽的效果,比如,圆角,阴影,渐变透明,渐变背景,等等。 因为IE6时代,没有什么标准,而因...

.NET:一个非常好用的SQL数据库处理类

using System; using System.Collections.Generic; using System.Collections; using System.Collections.S...

sql sever2005数据库备份和还原(Asp.net C#)

// 备份按钮protected void BtnBack_Click(object sender, EventArgs e) { ...

ASP.net非常好用的导出数据

protected void Excel_Click_Click(object sender, EventArgs e)         {        ...

VB6中一个非常好用的读写Ini文件的模块

VB6中一个非常好用的读写Ini文件的模块 新建模块(建议不使用注册表)   命名为rwini 'ini文件在有回车换行符会出错,经过测试,汉字要小于86字节,英言文要小于143字节才能返回列...

非常好用的SQL语句优化34条

1)选择最有效率的表名顺序(只在基于规则的优化器中有效): ORACLE 的解析器按照从右到左的顺序处理FROM子句中的表名,FROM子句中写在最后的表(基础表 driving table)将被最...

非常好用的SQL语句优化34条

(1)选择最有效率的表名顺序(只在基于规则的优化器中有效): ORACLE 的解析器按照从右到左的顺序处理FROM子句中的表名,FROM子句中写在最后的表(基础表 driving table)将被最先...

基于HTML5 Bootstrap搭建的后台模板,分页,模糊查询已经全部JS实现,无需编码,嵌入数据即可开发,内置8款皮肤,欧美风格,非常好用!

基于HTML5 Bootstrap搭建的后台模板,分页,模糊查询已经全部JS实现,无需编码,嵌入数据即可开发,内置8款皮肤,欧美风格,非常好用! 源代码下载地址:http://www.zuidaima...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:深度学习:神经网络中的前向传播和反向传播算法推导
举报原因:
原因补充:

(最多只允许输入30个字)