<form method="post" name="myform" action="?action=backupdatabase">   选择操作：   <input type="radio" name="act" id="act_backup"value="backup">   <label for=act_backup>备份</label>   <input type="radio" name="act" id="act_restore" value="restore">   <label for=act_restore>恢复</label>   <br>   数据库名：   <input type="text" name="databasename" value="<%=request("databasename")%>">   <br>   文件路径：   <input type="text" name="bak_file" value="c:\$1.bak">   (备份或恢复的文件路径)<br>   <input type="submit" value="确定" id=submit1 name=submit1> </form> <%  'sql server 数据库的备份与恢复!  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>备份成功!</font>"    end if   if act="restore" then   '恢复时要在没有使用数据库时进行！     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>恢复成功!</font>"   else     response.write "<font color=red>没有选择操作</font>"   end if   end if  end if %>