帮帮忙啊。一个用ASP恢复SQLServer数据的问题

[iceking2nd]

代码是这么写的：
if request("action")="backup" then
dim rs,sql
set rs=CreateObject("ADODB.RecordSet")
sql = "EXEC sp_addumpdevice 'disk','SUNBAK','" + CStr(server.MapPath("data\bak\"+ CStr(Date()) +".DAT")) + "'"
rs.open sql,conn,1,1
rs.close
sql = "BACKUP DATABASE " + SQLDataBaseName + " TO SUNBAK"
rs.open sql,conn,1,1
rs.close
sql = "EXEC sp_dropdevice 'SUNBAK'"
rs.open sql,conn,1,1
rs.close
set rs=nothing
%>
<!--#include file="inc/top.asp"-->
<p align="center">备份成功，文件名为<%= CStr(Date())%>.DAT，您可以将该文件下载到本地保存。<br><br>
<a href="/data/bak/<%= CStr(Date())%>.DAT">下载备份文件</a><br><br>
<a href="index2.asp">返回</a></p>
<!--#include file="inc/down.asp"-->
<%
elseif request("action")="restore" then
filename = CStr(server.MapPath("data\bak\"+ CStr(request("bakpath"))))
if USEFSO = 1 then
dim fs
set fs = Server.CreateObject("Scripting.FileSystemObject")
if fs.FileExists(filename) = false then
Response.Redirect ("error.asp?errorid=404")
end if
end if
set rs=CreateObject("ADODB.RecordSet")
sql = "EXEC sp_addumpdevice 'disk','SUNBAK','" + filename + "'"
rs.open sql,conn,1,1
rs.close
sql = "RESTORE DATABASE " + SQLDataBaseName + " FROM SUNBAK"
rs.open sql,conn,1,1
rs.close
sql = "EXEC sp_dropdevice 'SUNBAK'"
rs.open sql,conn,1,1
rs.close
set rs=nothing
%>
<!--#include file="inc/top.asp"-->
<p align="center">恢复成功，请重新登陆本系统！<br><br>
<a href="logout.asp">返回</a></p>
<!--#include file="inc/down.asp"-->
<%
else
......
end if

但是备份的功能可以实现，恢复的功能却不能实现。为什么啊？

[billpu]

还原已有的数据库不用system　administrator权限的　也就是说不用sa　
有dbowner即可
贴上报错的数据看看

[billpu]

可能　恢复不存在的数据库，那dbowner是不可以（数据库权限）　得有data_creaters权限(服务器角色不是数据库角色)才可以.代码略微看了一下 没什么问题

[iceking2nd]

SERVER对象我加了，呵呵有点粗心了。不过还是老问题，备份可以用恢复不可以用。我用的是sa帐号，理论上来说应该不受角色的限制。

[iceking2nd]

刚才在查询分析器里面运行了一下RESTORE语句，不成功的原因是数据库正在使用。但是我要访问网页的话就一定要打开数据库啊。怎么处理呢？

[iceking2nd]

TO yizia(椅子):
我用的库是一个自己建的库，不是pubs

[笨笨兔兔兔兔兔]

你是走sa权限么??

如果sa权限的话 查询分析器里可以的asp 程序就可以还有你要注意的是

set rs=server.CreateObject("ADODB.RecordSet")要走server对象的

[椅子]

程序连接的是哪个库啊？