无组件的数据库的备份与还原

看过数据库的备份与还原。大多数都是用组件来完成的。其实可通过sql语句来完成。
由于时间关系，未对参数进行验证和界面美化。代码仅供参考。
共计4个文件：下载地址：" CODEPAGE="936"%>

<%
'*************************************************
'数据库备份与还原
'编        程：魔术师·杨(MagicYang.CN)
'完成日期：2004-4-11
'说明：由于时间关系，未对数据做安全性验证。
'应用时请对数据进行验证，确保安全。
'QQ：1168064  欢迎大家互相交流
'*************************************************
%>

<%

%>

 
   
   
 
 
   
   
 
 
   
   
 
 
   
   
 
 
   
   
 

数据库设备：
添加设备：	设备名称：
	文件路径：
备份/还原：	数据库名称：   <%  rec li,"select name from master..sysdatabases where status=16"    %>    <%   while not li.eof   response.Write ""&li(0)&""   li.movenext   wend   cdb li   %>    备份到设备：<%  rec li,"select name,phyname from master..sysdevices where status=16"   %>     <%   while not li.eof   response.Write ""&li(0)&"(文件："&li(1)&")"   li.movenext   wend         cdb li   %>

cmd.asp

<%
on error resume next
if request("action") <> "" then
if request("action")="backup" then
sql ="BACKUP DATABASE "&request("database")&" To "& request("dev")
cmd sql
if err.number > 0 then
response.Write ""
else
response.Write ""
end if
else
sql ="RESTORE DATABASE "&request("database")&" From "& request("dev")
cmd sql
if err.number > 0 then
response.Write ""
else
response.Write ""
end if
end if
end if
%>

希望大家互相交流！QQ：1168064