用Asp备份与恢复SQL Server 数据库

专题栏目

最新热门

最新推荐

相关文章: FW MX和Flash MX的亲密合…
Flash和FW合作旋转文字动…
利用Sysprep让Ghost完美…
英文简历（市场助理）MA…
英文简历（人事助理）AS…
英文简历（销售助理）SA…
怎样在PHP中通过ADO调用…
在线增减.htpasswd内的用…
在Windows版的PHP中使用…
用PHP动态创建Flash动画

您现在的位置：军旅同心 >> 读书赏析 >> 学习园地 >> 电脑网络 >> 技术文章 >> 文章正文

用Asp备份与恢复SQL Server 数据库

作者：采集员文章来源：来源于网络点击数：更新时间：2005-9-10 14:13:18

51windows（原作）

一个用asp备份与恢复SQL Server数据库的例子代码，希望对一些朋友有用。(注意：数据库使用中可能无法恢复)

<HTML><HEAD><TITLE>SQL Server 数据库的备份与恢复</TITLE><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></HEAD><BODY><form method="post" name=myform>选择操作：<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="确定"></form><%'SQL Server 数据库的备份与恢复!'海娃'http://www.51windows.Netdim sqlserver,sqlname,sqlpassword,sqlLoginTimeout,databasename,bak_file,actsqlserver = "localhost" 'sql服务器sqlname = "sa" '用户名sqlpassword = "sa" '密码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.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>" elseif 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 ifend if%></BODY></HTML>

免责声明：作品版权归所属媒体与作者所有!!本站刊载此文不代表同意其说法或描述，仅为提供更多信息。如果您认为我们侵犯了您的版权，请告知！本站立即删除。有异议请联系我们。

文章录入：烟灰缸责任编辑：烟灰缸

上一篇文章：用Asp备份与恢复SQL Server 数据库

下一篇文章：用Asp备份与恢复SQL Server 数据库

【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

高级搜索

网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

退伍军人创业网	无悔的军旅生涯	中国海军网	当兵那一天	全球防务	中国当代文学会馆	云南商务投资网	点击申请	点击申请	点击申请
点击申请	点击申请	点击申请	点击申请	点击申请	点击申请	点击申请	点击申请	点击申请	点击申请