在VB中处理SQL备份时出现在的异常问题.请大家帮忙解决.

ksv988 2004-11-04 08:09:37

一 主要控件:一个按钮,一个common dialog control6.0,一个标签.
二 代码如下:
Option Explicit

Private WithEvents objBackup As SQLDMO.Backup

Private Sub Command1_Click()

d.ShowSave

Dim objSqlSer As New SQLDMO.SQLServer
objSqlSer.Connect "(注:IP地址", "sa", "密码"

MsgBox "OK"

Set objBackup = New SQLDMO.Backup
With objBackup

.PercentCompleteNotification = 1
.Database = "注(数据库名)"
.Files = d.FileName

.SQLBackup objSqlSer
End With
'Set objBackup = Nothing

objSqlSer.Close
Set objSqlSer = Nothing
End Sub

Private Sub Form_Load()

End Sub

Private Sub objBackup_Complete(ByVal Message As String)
Set objBackup = Nothing
MsgBox "已经完成备份"
End Sub

Private Sub objBackup_PercentComplete(ByVal Message As String, ByVal Percent As Long)

'Debug.Print Percent
p.Value = Percent

l1.Caption = ""
l1.Caption = Percent & " %"

DoEvents
End Sub



三 出现的错误:
我在运行时,老是出现下面的对话框

run_time error '-2147218303(80040c81)':
[Microsoft][ODBC SQL SERVER][SQL Server]无法打开备份设备
'c:\program files\microsoft sqlserver\mssql\backup\settings\mfksowwx\桌面\234.bak'.设备
出现错误或设备脱机.详细信息请参阅SQL SERVER错误日志.
[microsoft][ODBC sql server driver][sql server]BACKUP DATABASE 操作异常终止.



四 问题所在....
就是说只要保存在桌面都不行,但是保存在其他的盘或是文件夹都是可以的.

各位高手有知道的请告诉小弟,万分感谢.!!!!!!

五 各位高手一起来谈讨一下问题的所在......共同进步.....



...全文
66 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
pweixing 2004-11-05
  • 打赏
  • 举报
回复
路径中不能包含长文件名,就是说目录不能有空格在中间,你回去试验一下,你即使是保存在C:\PROGRAM FILES下一样不行!但是如果你使用msdos方式的长文件名就可以,比如
C:\program files\ 写成 c:\progra~1\ 就可以,我想这个是因为sqldmo要支持msdos模式的一些命令的原因吧!
artoksxb 2004-11-05
  • 打赏
  • 举报
回复
楼上有道理的!是文件出现的问题的

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧