❶ 如何用代码把access文件压缩成带密码的winrar文件。最好用vb写的。因为access文件很容易就被破解了。所...
用 Shell 调用 WinRAR
Private Sub Command1_Click()
Shell "C:\Program Files\WinRAR\WinRAR.exe a -p123456-r c:\456.rar c:\123.mdb"
End Sub
123456 为密码
把123.mdb 加密压缩为文件 456.rar
❷ VB 怎么样实现压缩ACCESS数据库的功能!
'工程-引入
Microsoft
Jet
and
Replication
Objects
Library
Private
Sub
Command1_Click()
Dim
FIXDB
As
New
JRO.JetEngine
FIXDB.CompactDatabase
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=c:\aa.mdb",
_
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=c:\aac.mdb"
End
Sub
'CompactDatabase
第一个参数是原始数据库，第二个是目标数据库
❸ vb怎么调用access数据库的压缩功能
java">
'
这些代码可放在模块中，在其他窗体也使用"kernel32"Alias_
"GetTempPathA"(ByValnBufferLengthAsLong,ByVallpBufferAsString)AsLong
PublicConstMAX_PATH=260
Public
Sub
CompactJetDatabase(Location
As
String,
Optional
BackupOriginal
As
Boolean
=True)
OnErrorGoToCompactErr
DimstrBackupFileAsString
DimstrTempFileAsString
'
检查数据库文件是否存在IfLen(Dir(Location))Then
'
如果需要备份就执行备份IfBackupOriginal=TrueThen
strBackupFile=GetTemporaryPath&"backup.mdb"
IfLen(Dir(strBackupFile))ThenKillstrBackupFile
FileCopyLocation,strBackupFile
EndIf'
创建临时文件名strTempFile=GetTemporaryPath&"temp.mdb"
IfLen(Dir(strTempFile))ThenKillstrTempFile'
通过
DBEngine
压缩数据库文件DBEngine.CompactDatabaseLocation,strTempFile'
删除原来的数据库文件KillLocation'
拷贝刚刚压缩过临时数据库文件至原来位置FileCopystrTempFile,Location
❹ 怎样用vb把数据库（Access)压缩和修复
以前使用
DAO
时，Microsoft
有提供
CompactDatabase
Method
来压缩
Microsoft
Access
文件，RepairDatabase
Method
来修复损坏的
Microsoft
Access
文件，。可是自从
ADO
出来之后，好像忘了提供相对的压缩及修复
Microsoft
Access
文件的功能。
现在
Microsoft
发现了这个问题了，也提供了解决方法，不过有版本上的限制！限制说明如下：
ActiveX
Data
Objects
(ADO),
version
2.1
Microsoft
OLE
DB
Provider
for
Jet,
version
4.0
这是
Microsoft
提出的
ADO
的延伸功能：Microsoft
Jet
OLE
DB
Provider
and
Replication
Objects
(JRO)
这个功能在
JET
OLE
DB
Provider
version
4.0
(Msjetoledb40.dll)
及
JRO
version
2.1
(Msjro.dll)
中第一次被提出！
这些必要的
DLL
文件在您安装了
MDAC
2.1
之后就有了，您可以在以下的网页中下载
MDAC
的最新版本！
Universal
Data
Access
Web
Site
在下载之前先到
VB6
中检查一下，【控件】【设定引用项目】中的
Microsoft
Jet
and
Replication
Objects
X.X
library
如果已经是
2.1
以上的版本，您就可以不用下载了！
1、新建一个新表单，选择功能表中的【控件】【设定引用项目】。
2、加入
Microsoft
Jet
and
Replication
Objects
X.X
library，其中
(
X.X
大于或等于
2.1
)。
3、在适当的地方加入以下的程序代码，记得要修改
data
source
的内容及目地文件的路径：
Dim
jro
As
jro.JetEngine
Set
jro
=
New
jro.JetEngine
jro.CompactDatabase
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=d:\
wind2.mdb",
_
'来源文件
在
DAO
3.60
之后，RepairDatabase
Method
已经无法使用了，以上的程序代码显示了
ADO
CompactDatabase
Method
的用法，而它也取代了
DAO
3.5
时的
RepairDatabase
method！
❺ vb access 数据库压缩的问题
工具 － 然后第6个 - 第2个 应该是压缩及修复数据库 可以实现数据库压缩，我的是繁体版本，可能命令有不同，自己仔细找下”压缩及修复数据库“菜单，
❻ 我想知道如何用vb代码把access文件压缩成带密码的文件。
对于Windows操作系统的安全模式，经常使用电脑的朋友肯定不会感到陌生，安全模式是Windows用于修复操作系统错误的专用模式，是一种不加载任何驱动的最小系统环境，用安全模式启动电脑，可以方便用户排除问题，修复错误。
进入安全模式的方法是：启动计算机，在系统进入Windows启动画面前，按下F8键(或者在启动计算机时按住Ctrl键不放)，在出现的启动选项菜单中，选择“Safe Mode”，即可
以安全模式启动计算机。那么安全模式到底有哪些用途呢？下面就让我们具体来看一下。
1.修复系统故障
如果Windows运行起来不太稳定或者无法正常启动，这时候先不要忙着重装系统，试着重新启动计算机并切换到安全模式启动，之后再重新启动计算机，系统是不是已经恢复正常了？如果是由于注册表有问题而引起的系统故障，此方法非常有效，因为Windows在安全模式下启动时可以自动修复注册表问题，在安全模式下启动Windows成功后，一般就可以在正常模式(Normal)下启动了。
2.恢复系统设置
如果用户是在安装了新的软件或者更改了某些设置后，导致系统无法正常启动，也需要进入安全模式下解决，如果是安装了新软件引起的，请在安全模式中卸载该软件，如果是更改了某些设置，比如显示分辨率设置超出显示器显示范围，导致了黑屏，那么进入安全模式后就可以改变回来，还有把带有密码的屏幕保护程序放在“启动”菜单中，忘记密码后，导致无法正常操作该计算机，也可以进入安全模式更改。
3.删除顽固文件
我们在Windows下删除一些文件或者清除回收站内容时，系统有时候会提示“某某某文件正在被使用，无法删除”的字样，有意思的是，通常这些文件并没有正在被使用，那么是不是让这些文件永远霸占我们的硬盘呢？请不要着急，重新启动计算机，并在启动时按下F8键进入安全模式，试着删除那些顽固文件并清空回收站看一看，没了！原来Windows已经放弃了对这些文件的保护，可以把它们删除了。
4.彻底清除病毒
现在病毒一天比一天多，杀毒软件也跟着天天更新。但是，在Windows正常模式下有时候并不能干净彻底地清除病毒，因为它们极有可能会交*感染，而一些杀毒程序又无法在DOS下运行，这时候我们当然也可以把系统启动至安全模式，使Windows只加载最基本的驱动程序，这样杀起病毒来就更彻底、更干净了。
5.磁盘碎片整理
在碎片整理的过程中，是不能运行其它程序的，因为每当其它程序进行磁盘读写操作时，碎片整理程序就会自动重新开始，而一般在正常启动Windows时，系统会加载一些自动启动的程序，有时这些程序又不易手动关闭，常常会对碎片整理程序造成干扰，这种情况下，我们就应该重新启动计算机，进入安全模式，安全模式是不会启动任何自动启动程序的，可以保证磁盘碎片整理的顺利进行
❼ VB ACCESS 数据库压缩问题
是在哪里操作数据库的？数据库是什么？
就在数据库系统里还是别的什么程序里？
如果在vb里用ado操作数据库应该不会变大的，不过这么大的数据没试过，小数据使用时好像数据库没有变的很大
❽ vb+access数据库，如何释放内存
把ACCESS文件db.mdb改成db.dll一样使用，然后每次启动程序需要带啊么处理先压缩数据库文件，然后复制替换以前的版本，这样你会发现数据库一直是压缩状态。
❾ 为什么我的VB 在压缩access数据库时，jetengine只有两个参数
用VB命令进行 Access数据库压缩，命令格式：
DBEngine.CompactDatabase oFileName, nFileName
实际是把 oFileName 压缩成新的文件 nFileName
在执行压缩命令前要保证 Access 数据库没有被其它用户再使用.