错误返回值是2147217880怎么解决。急啊

Question

try :
ALTER DATABASE DB_NAME SET SINGLE_USER THEN RESTORE AGAIN

Answer 1

我用下面函数还原数据库。在有的机器上面可以。在有的机器上面不行，机器上没有装SQL  server,用的msde,都是win2000 server的环境。
Public Function CappSQLRestore(ByVal pDatabase As String, ByVal pFile As String) As String
    On Error GoTo HandleError    Dim oRestore As New SQLDMO.RESTORE
    oRestore.Database = pDatabase
    oRestore.Files = pFile
    oRestore.SQLRestore oSQLServer
    CappSQLRestore = "数据库 " & pDatabase & " 恢复成功！"    Exit Function
HandleError:
    CappSQLRestore = "数据库 " & pDatabase & " 恢复失败！ " & vbCrLf & PrintError
    Exit Function
End Function
就报的上面的错误。

Answer 2

我用的就是SQL-DMO，但是在纯MSDE(没有安装SQL SERVER)环境下用不了。
程序报错。错误值2147217880.2147217880错误： The specified status flag was neither
DBCOLUMNSTATUS_OK nor DBCOLUMNSTATUS_ISNULL