Друзья, использующие ASP, могут использовать следующий код для реализации операции резервного копирования и восстановления базы данных mssql <form Method=post name=myform action=?action=backupdatabase>
Выберите действие:
<тип ввода=имя радио=идентификатор действия=act_backupvalue=резервное копирование>
<label for=act_backup>Резервное копирование</label>
<тип ввода=имя радио=идентификатор действия=значение act_restore=восстановить>
<label for=act_restore>Восстановить</label>
<br>
Имя базы данных:
<тип ввода=текстовое имя=имя базы данных значение=<%=запрос(имя базы данных)%>>
<br>
Путь к файлу:
<тип ввода=текстовое имя=значение bak_file=c:/$1.bak>
(Путь к файлу для резервного копирования или восстановления)<br>
<тип ввода=отправить значение=ОК id=отправить1 имя=отправить1>
</форма>
<%
'Резервное копирование и восстановление базы данных SQL-сервера!
если запрос(действие)=резервное копирование базы данных, то
dim sqlserver,sqlname,sqlpassword,sqllogintimeout,имя базы данных,bak_file,act
'********************************************** * ************************
sqlserver=127.0.0.1
sqlname=sa
sqlпароль = 111
sqllogintimeout=15
имя базы данных = обрезка (запрос (имя базы данных))
bak_file = обрезка (запрос (bak_file))
bak_file = replace(bak_file,$1,имя базы данных)
действие = lcase(запрос(действие))
'********************************************** * ************************
если имя базы данных = тогда
response.write имя входной базы данных
еще
если действие = резервное копирование, то
set srv=server.createobject(sqldmo.sqlserver)
srv.logintimeout = sqllogintimeout
srv.connect sqlserver, sqlname, sqlpassword
установите bak = server.createobject(sqldmo.backup)
bak.database=имя базы данных
bak.devices=файлы
бак.действие = 0
бак.инициализация = 1
'bak.replace = правда
bak.files=bak_file
bak.sqlbackup срв
если номер ошибки>0, то
ответ.запишите номер ошибки&<font color=red><br>
ответ.напишите описание ошибки&</font>
конец, если
response.write <font color=green>Резервное копирование выполнено!</font>
конец, если
если действие=восстановить, то
'Восстановление следует выполнять, когда база данных не используется!
установить srv=server.createobject(sqldmo.sqlserver)
srv.logintimeout = sqllogintimeout
srv.connect sqlserver, sqlname, sqlpassword
установить rest=server.createobject(sqldmo.restore)
rest.action=0 'полное восстановление базы данных
rest.database=имя базы данных
rest.devices=файлы
rest.files=bak_file
rest.replacedatabase=true 'принудительное восстановление существующей базы данных
если номер ошибки>0, то
ответ.запишите номер ошибки&<font color=red><br>
ответ.напишите описание ошибки&</font>
конец, если
rest.sqlrestore srv
response.write <font color=green>Успешно восстановлено!</font>
еще
response.write <font color=red>Операция не выбрана</font>
конец, если
конец, если
конец, если
%>