Amigos que usam ASP podem usar o código a seguir para implementar a operação de backup e restauração do banco de dados mssql <form method=post name=myform action=?action=backupdatabase>
Selecione a ação:
<tipo de entrada=nome do rádio=act id=act_backupvalue=backup>
<label for=act_backup>Backup</label>
<tipo de entrada=nome do rádio=act id=act_restore valor=restore>
<label for=act_restore>Restaurar</label>
<br>
Nome do banco de dados:
<tipo de entrada=nome do texto=nome do banco de dados valor=<%=request(nome do banco de dados)%>>
<br>
Caminho do arquivo:
<tipo de entrada=nome do texto=bak_file valor=c:/$1.bak>
(Caminho do arquivo para backup ou restauração)<br>
<tipo de entrada = enviar valor = OK id = enviar1 nome = enviar1>
</form>
<%
'Backup e recuperação de banco de dados SQL Server!
se solicitação(ação)=backupdatabase então
dim sqlserver,sqlname,sqlpassword,sqllogintimeout,databasename,bak_file,act
'********************************************** ************************
servidorsql=127.0.0.1
nomesql=sa
senhasql=111
sqllogintimeout=15
nome do banco de dados = trim(request(nome do banco de dados))
arquivo_bak = trim(solicitação(arquivo_bak))
bak_file = substituir(bak_file,$1,nome do banco de dados)
agir = lcase(solicitação(agir))
'********************************************** ************************
se nome do banco de dados = então
nome do banco de dados de entrada response.write
outro
se agir = backup então
definir srv=server.createobject(sqldmo.sqlserver)
srv.logintimeout=sqllogintimeout
srv.connect sqlserver, nomesql, senhasql
definir bak = server.createobject(sqldmo.backup)
bak.database=nome do banco de dados
bak.devices=arquivos
bak.action = 0
bak.initialize = 1
'bak.replace = verdadeiro
bak.files=bak_file
bak.sqlbackup srv
se err.número>0 então
resposta.write err.number&<font color=red><br>
resposta.write err.descrição&</font>
terminar se
response.write <font color=green>Backup bem-sucedido!</font>
terminar se
se agir = restaurar então
'A restauração deve ser realizada quando o banco de dados não estiver em uso!
definir srv=server.createobject(sqldmo.sqlserver)
srv.logintimeout=sqllogintimeout
srv.connect sqlserver, nomesql, senhasql
definir rest=server.createobject(sqldmo.restore)
rest.action=0 'restauração completa do banco de dados
rest.database = nome do banco de dados
rest.devices=arquivos
rest.files=bak_file
rest.replacedatabase=true 'força a restauração do banco de dados existente
se err.número>0 então
resposta.write err.number&<font color=red><br>
resposta.write err.descrição&</font>
terminar se
rest.sqlrestore srv
response.write <font color=green>Restaurado com sucesso!</font>
outro
response.write <font color=red>Nenhuma operação selecionada</font>
terminar se
terminar se
terminar se
%>