为什么只能备份到服务器的硬盘上，可以让他备份到客户机的硬盘上吗？如何修改？？　如何删除服务器上备份的文件？？

febricity 2004-09-16 11:19:43

Dim cnn As ADODB.Connection
Dim SQL As String, Backup As String

Set cnn = New ADODB.Connection
cnn.Open ConnectString
If MsgBox("备份为最新的数据库，您真的要备份吗？", vbOKCancel + vbExclamation, "警告") = vbOK Then

SQL = "use jyglxt"
cnn.Execute SQL
Backup = App.Path & "\jyglxt.dat"

Kill Backup ???删除本机（客户机）的jyglxt.dat文件
SQL = "backup database jyglxt to disk=" & "'" & Backup & "'"　　　　？？备份到服务器的硬盘上，可以让他备份到客户机的硬盘上吗？如何实现？？　　
cnn.Execute SQL
MsgBox "备份数据库成功！", vbOKOnly, "成功"
End If

为什么是删除客户机的备份文件，而把数据库备份到服务器上呢？不删除还不可以？？？？？

...全文

147 5 打赏收藏转发到动态举报

写回复

用AI写文章

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

Keown 2004-12-13

打赏
举报

mark

zhangzem 2004-12-13

打赏
举报

牛B

chump 2004-09-17

打赏
举报

缺省安装，SQL服务运行在本地系统帐户目录下，而该帐户是没有访问网络资源的权限的。
如果想使用网络资源，必须使用域帐户启动SQL服务！
这样就可以访问网络上的任何有权限的资源了。

zjcxc 2004-09-16

打赏
举报

--备份到指定的电脑上的话,需要完全共享备份的目录,用下面的方法备份:

backup database 数据库 to disk='\\<计算机名>\共享目录名\备份文件名'

---可能会产生权限问题,这可以通过映射来解决

--1.映射
exec master..xp_cmdshell 'net use z: \\xz\c$ "" /user:xz\administrator'

/*--说明:
z: 是映射网络路径对应本机的盘符,与下面的备份对应
\\xz\c$ 是要映射的网络路径
xz\administrator xz是远程的计算机名,administrator是登陆的用户名
--*/

--2.进行数据库备份
backup database 数据库名 to disk='z:\备份文件名'

--3.备份完成后删除映射
exec master..xp_cmdshell 'net use z: /delete'

zjcxc 2004-09-16

打赏
举报

因为所有的sql语句都是在服务器上执行的(包括备份的sql),所以只能备份到服务器上.

SQL = "backup database jyglxt to disk=" & "'" & Backup & "' with init"　--这样可以重新初始化备份文件,不一定需要删除备份文件的.
cnn.Execute SQL