用Asp备份与恢复SQL Server 数据库
2018-09-06 12:48
一个用asp备份与恢复SQLServer数据库的例子代码，希望对一些朋友有用。(注意：数据库使用中可能无法恢复)
复制代码 代码如下:
<HTML>
<HEAD>
<TITLE>SQLServer数据库的备份与恢复</TITLE>
<metahttp-equiv=Content-Typecontent=text/html;charset=gb2312>
</HEAD>
<BODY>
<formmethod=postname=myform>
选择操作：<INPUTTYPE=radioNAME=actid=act_backupvalue=backup><labelfor=act_backup>备份</label>
<INPUTTYPE=radioNAME=actid=act_restorevalue=restore><labelfor=act_restore>恢复</label>
<br>数据库名：<INPUTTYPE=textNAME=databasenamevalue=<%=request(databasename)%>>
<br>文件路径：<INPUTTYPE=textNAME=bak_filevalue=c:\$1.bak>(备份或恢复的文件路径)<br>
<inputtype=submitvalue=确定>
</form>
<%
SQLServer数据库的备份与恢复!
海娃
dimsqlserver,sqlname,sqlpassword,sqlLoginTimeout,databasename,bak_file,act
sqlserver=localhostsql服务器
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))
ifdatabasename=then
response.writeinputdatabasename
else
ifact=backupthen
Setsrv=Server.CreateObject(SQLDMO.SQLServer)
srv.LoginTimeout=sqlLoginTimeout
Setbak=Server.CreateObject(SQLDMO.Backup)
bak.Database=databasename
bak.Devices=Files
bak.Files=bak_file
bak.SQLBackupsrv
iferr.number>0then
response.writeerr.number&<fontcolor=red><br>
response.writeerr.description&</font>
endif
Response.write<fontcolor=green>备份成功!</font>
elseifact=restorethen
恢复时要在没有使用数据库时进行！
Setsrv=Server.CreateObject(SQLDMO.SQLServer)
srv.LoginTimeout=sqlLoginTimeout
srv.Connectsqlserver,sqlname,sqlpassword
Setrest=Server.CreateObject(SQLDMO.Restore)
rest.Action=0fulldbrestore
rest.Database=databasename
rest.Devices=Files
rest.Files=bak_file
rest.ReplaceDatabase=TrueForcerestoreoverexistingdatabase
iferr.number>0then
response.writeerr.number&<fontcolor=red><br>
response.writeerr.description&</font>
endif
rest.SQLRestoresrv
Response.write<fontcolor=green>恢复成功!</font>
else
Response.write<fontcolor=red>没有选择操作</font>
endif
endif
%>
</BODY>
</HTML>