在VB程序中如何备份ACSESS数据库 在VB中如何创建一个ACSESS数据库并打开此数据库进行操作。将已知数据库的数据备份到此数据库中。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 其实对于access数据库,当你备份时,直接用filecopy把它复制到某个位置就可以了;恢复时,同样用filecopy把备份的文件复制回来。注意复制回来时,如果用的名字是一样的,需要用kill删掉原来的数据库,否则会报错,在windows里同一个文件下文件同名时都会提示,道理一样。 如果ACCESS数据库加了密码,复制时会出错, 这个怎么解决 '拷贝数据库备份FileCopy "c:\a.mdb", "d:\bak.mdb"'恢复的时候将所有连接断开,然后拷贝回来FileCopy "d:\bak.mdb", "c:\a.mdb" 呵呵,UP,跟在老李后边学习ING----- 这样也是可以的备份:FileCopy "c:\a.mdb", "d:\a.bak"恢复:FileCopy "d:\a.bak", "c:\a.mdb" 创建Access数据库: Set wspDefault = DBEngine.Workspaces(0) ' Create new, encrypted database. Set dbs = wspDefault.CreateDatabase(app.path + "Newdb.mdb", _ dbLangChineseSimplified & ";pwd=NewPassword", dbEncrypt) ' Create new table with two fields. 首先要看你是打算备份全部数据,还是打算备份部分数据。 如果你打算备份全部数据,你可以使用VB的FileCopy命令进行文件拷贝,将源文件拷贝至目标磁盘。当然如果你的文件大小超过一张软盘的尺寸,你可以使用文件读写的办法将文件分成几部分保存在软盘上。 如果文件非常大,可以使用WinZIP等软件压缩保存,你可以在http://www.winzip.com/wzcline.cgi下载WinZip 7.0的Command Line Support Add-On。有了这个Add-On,你就可以以命令行方式调用WinZip 7.0进行压缩和解压缩,其命令行语法同DOS下的PKZIP兼容。 如压缩C:\Data目录的文件到c:\data.zip文件,可以这样: Shell "d:\winzip\wzzip c:\data.zip c:\data" 释放c:\data.zip文件到C:\Data目录的文件,如: Shell "d:\winzip\wzunzip c:\data.zip c:\data\" 关于更多的用法,你可以参考这个Add-On的帮助文件。 如果你只打算备份部分数据,你可以使用SQL的Insert into命令,如下: Set dbs = OpenDatabase("Northwind.mdb") dbs.Execute " INSERT INTO Customers IN 'C:\TEMP.MDB'" _ & "SELECT * " _ & "FROM [New Customers];" dbs.Close 这样你可以把要备份的数据先存放在一个临时数据库中,再利用前面所说的办法将这个数据库保存在软盘上。 不行!当前需要备份的数据库,是VB程序正在使用的库,不是那种单个放在那里的文件!还有CreateDatabaseOpenDatabase这两个属性要用的话,要引用什么吗?我定义不起来!要不就是With块未定义!解答给分! 关于上午EXCEL的VBA.AppActivate的代码。 关于Chr(13)+ Chr(10)的疑惑 crviewer.dll 求教高手!如何用TOOLBAR控件实现类似如WINDOWS资源管理器中的菜单栏! VB如何存取DB2的BLOB字段?急! mscomm 控件 急:::子窗口不能显示.(在线等) 关于ado打开数据库的运行速度的问题? 根据txt记事本坐标生成线 如何将vb中的一个txt文件转换成xml文件,相当于手工操作时修改后缀名。 如何防止我的dbGrid控件的当前编辑的行挪动位置,结果导致错误---"无当前纪录,"--在线 sos(on line)
FileCopy "c:\a.mdb", "d:\bak.mdb"
'恢复的时候将所有连接断开,然后拷贝回来
FileCopy "d:\bak.mdb", "c:\a.mdb"
备份:
FileCopy "c:\a.mdb", "d:\a.bak"
恢复:
FileCopy "d:\a.bak", "c:\a.mdb"
Set wspDefault = DBEngine.Workspaces(0)
' Create new, encrypted database.
Set dbs = wspDefault.CreateDatabase(app.path + "Newdb.mdb", _
dbLangChineseSimplified & ";pwd=NewPassword", dbEncrypt)
' Create new table with two fields.
如果你打算备份全部数据,你可以使用VB的FileCopy命令进行文件拷贝,将源文件拷贝至目标磁盘。当然如果你的文件大小超过一张软盘的尺寸,你可以使用文件读写的办法将文件分成几部分保存在软盘上。
如果文件非常大,可以使用WinZIP等软件压缩保存,你可以在http://www.winzip.com/wzcline.cgi下载WinZip 7.0的Command Line Support Add-On。有了这个Add-On,你就可以以命令行方式调用WinZip 7.0进行压缩和解压缩,其命令行语法同DOS下的PKZIP兼容。
如压缩C:\Data目录的文件到c:\data.zip文件,可以这样:
Shell "d:\winzip\wzzip c:\data.zip c:\data"
释放c:\data.zip文件到C:\Data目录的文件,如:
Shell "d:\winzip\wzunzip c:\data.zip c:\data\"
关于更多的用法,你可以参考这个Add-On的帮助文件。 如果你只打算备份部分数据,你可以使用SQL的Insert into命令,如下:
Set dbs = OpenDatabase("Northwind.mdb")
dbs.Execute " INSERT INTO Customers IN 'C:\TEMP.MDB'" _
& "SELECT * " _
& "FROM [New Customers];"
dbs.Close
这样你可以把要备份的数据先存放在一个临时数据库中,再利用前面所说的办法将这个数据库保存在软盘上。
还有
CreateDatabase
OpenDatabase
这两个属性要用的话,要引用什么吗?我定义不起来!要不就是With块未定义!
解答给分!