请问这个数据库恢复的错误如何解决!?谢谢 那就是你的语法错误的, 在SQL的查询分析器里执行一下吧 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 http://211.141.67.12:88/vb/rebak.zip下载吧 我做的 完整版 这种问题很多人问过了===========================================Private Sub Restore() Dim cn As New ADODB.Connection With cn .Open "Provider=SQLOLEDB; " & _ "Server=" & ServerName & ";" & _ "Database=ddd;" & _ "Uid=" & ServerID & ";" & _ "Pwd=" + ServerPassword + ";" .Execute "use master" .Execute "alter database ddd set SINGLE_USER" .Execute "restore database ddd from disk='d:\ddd.bak'" .Execute "alter database ddd set MULTI_USER" .Execute "use ddd" End WithEnd Sub 安装VB6出现错误 关于list的小问题 MSCOMM的奇怪问题,为什么不能返回INPUT的值???? select case 语句为什么不能实现 高手,救命啊? 科学计数变为字符串的问题 谁能给一份简单清楚的用ado连接access数据库,查询出结果的例子。请指点,80分(必给) 急求自动点广告+刷流量源码 有谁看过或做过用VB做的交通管理处罚系统? 问一个打印的问题,急! 请教各位,一个文件分割软件的算法怎么写? 用VB写的DLL(已生成),可不可以转换成有原码的制作DLL过程??
完整版
===========================================
Private Sub Restore()
Dim cn As New ADODB.Connection
With cn
.Open "Provider=SQLOLEDB; " & _
"Server=" & ServerName & ";" & _
"Database=ddd;" & _
"Uid=" & ServerID & ";" & _
"Pwd=" + ServerPassword + ";"
.Execute "use master"
.Execute "alter database ddd set SINGLE_USER"
.Execute "restore database ddd from disk='d:\ddd.bak'"
.Execute "alter database ddd set MULTI_USER"
.Execute "use ddd"
End With
End Sub