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 
%>