呜呜~我的数据库备份为什么不行?(简单,送分)
y_may 2003-05-14 11:10:55 在vb里:
Dim cnn As ADODB.Connection
Set cnn = New ADODB.Connection
Dim cmdBU As ADODB.Command
Set cmdBU = New ADODB.Command
Dim cmdCD As ADODB.Command
Set cmdCD = New ADODB.Command
cnn.ConnectionString = CnnStr
cnn.Open
Dim Param1 As ADODB.Parameter
Dim Param2 As ADODB.Parameter
Dim Param3 As ADODB.Parameter
Set cmdCD.ActiveConnection = cnn
cmdCD.CommandType = adCmdStoredProc
cmdCD.CommandText = "sp_addumpdevice"
Set Param1 = cmdCD.CreateParameter("p1", adVarChar, adParamInput, 20)
cmdCD.Parameters.Append Param1
Set Param2 = cmdCD.CreateParameter("p2", adVarChar, adParamInput, 20)
cmdCD.Parameters.Append Param2
Set Param3 = cmdCD.CreateParameter("p3", adVarWChar, adParamInput, 260)
cmdCD.Parameters.Append Param3
cmdCD("p1") = "disk"
cmdCD("p2") = "kqdb"
cmdCD("p3") = "e:\db\kqdb.dat"
cmdCD.Execute
Set cmdBU.ActiveConnection = cnn
cmdBU.CommandType = adCmdStoredProc
cmdBU.CommandText = "prokqbk"
cmdBU.Execute
cnn.Close
我的porkqbk存储过程是这样的:
ALTER PROCEDURE ProKqBK
AS
BACKUP DATABASE kq TO kqbk
运行时,提示说:无法打开备份设备“kqdb”,设备出现错误或脱机
怎么办~