1、备份  
<%  
SQL="backup database 数据库名 to disk='"&Server.MapPath("backup")&"\"&"backuptext.dat"&"'"  
set cnn=Server.createobject("adodb.connection")  
cnn.open "driver={SQL Server};Server=服务器名;uid=sa;pwd="  
cnn.execute SQL  
on error resume next  
if err<>0 then  
response.write "错误:"&err.Descripting  
else  
response.write "数据备份成功!"  
end if  
cnn.close  
set cnn=nothing  
%>  
2、恢复  (注恢复要在没有使用数据库的情况下恢复)
<%  
SQL="Restore database 数据库名 from disk='"&Server.MapPath("backup")&"\"&"backuptext.dat"&"'"  
set cnn=Server.createobject("adodb.connection")  
cnn.open "driver={SQL Server};Server=服务器名;uid=sa;pwd="  
cnn.execute SQL  
on error resume next  
if err<>0 then  
response.write "错误:"&err.Descripting  
else  
response.write "数据恢复成功!"  
end if  
cnn.close  
set cnn=nothing  
%>