| 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>" srv.disconnect Set srv = nothing Set rest = nothing else Response.write "<font color=red>没有选择操作</font>" end if end if %> </BODY> </HTML>
|
| 共2页: 上一页 [1] 2 下一页 |
评论加载中…