❶ 如何用代碼把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 資料庫沒有被其它用戶再使用.