最近，写了个asp+sql数据库后台管理的程序，总是不能备份数据库到本机上，而是备份到了服务器上，请帮帮小弟看看是哪里错了？

<% 'SQL Server 数据库的备份与恢复! 
if request("action")="backupdatabase" Then 
   dim sqlserver,sqlname,sqlpassword,sqlLoginTimeout,databasename,bak_file,act 
   sqlserver = "*.*.*.*"
   sqlname = "***"
   sqlpassword ="***"
   sqlLoginTimeout = 15
   databasename = trim(request("databasename")) 
   bak_file = trim(request("bak_file"))
   act = lcase(request("act"))
   if databasename = "" then
      response.write "请输入数据库名称！！"
   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.Action= 0
         bak.Initialize= true
         bak.Files=bak_file 
         bak.SQLBackup(srv)
         Response.write "<font color=green>备份成功!</font>" 
      elseif 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
         rest.Database=databasename 
         rest.Files=bak_file 
         rest.ReplaceDatabase=True 'Force restore over existing database 
         rest.SQLRestore(srv)
         Response.write "<font color=green>恢复成功!</font>"
      else 
         Response.write "<font color=red>没有选择操作</font>"
      end if 
   end if 
end if
%>