Friends who use ASP can use the following code to implement the backup and restore operation of mssql database <form method=post name=myform action=?action=backupdatabase>
Select action:
<input type=radio name=act id=act_backupvalue=backup>
<label for=act_backup>Backup</label>
<input type=radio name=act id=act_restore value=restore>
<label for=act_restore>Restore</label>
<br>
Database name:
<input type=text name=databasename value=<%=request(databasename)%>>
<br>
File path:
<input type=text name=bak_file value=c:/$1.bak>
(File path for backup or restore)<br>
<input type=submit value=OK id=submit1 name=submit1>
</form>
<%
'SQL server database backup and recovery!
if request(action)=backupdatabase then
dim sqlserver,sqlname,sqlpassword,sqllogintimeout,databasename,bak_file,act
'************************************************ *************************
sqlserver=127.0.0.1
sqlname=sa
sqlpassword =111
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.action = 0
bak.initialize = 1
'bak.replace = true
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>Backup successful!</font>
end if
if act=restore then
'Restore should be performed when the database is not in use!
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>Restored successfully!</font>
else
response.write <font color=red>No operation selected</font>
end if
end if
end if
%>