作者tedpc (PACSMAN)
看板Database
標題Re: [問題]VB6.0連結Access資料庫
時間Sun Jul 22 12:12:53 2007
※ 引述《crooket (懟軮)》之銘言:
: 我再VB裡進行對Access資料庫的控制跟計算
: 但是卻發現刪除資料表時整個資料庫的大小不會變小
: ex:
: 未刪除資料表前資料庫大小為2G
: 刪除某個大資料表後還是2G
: 而且我資料庫大小最大只能跑到2095108kb
: 請問該如何解決這些問題
: 補充:
: 我刪除資料表的code為 db.execute "drop table XXX"
Module Module1
Sub Main()
Dim jro As JRO.JetEngine
jro = New JRO.JetEngine()
jro.CompactDatabase("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\nwind.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\NewNwind.mdb;Jet OLEDB:Engine Type=5")
MsgBox("Finished Compacting Database!")
End Sub
End Module
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.123.9.189