OLEObject PBObject
long ll_status
PBObject = CREATE OLEObject
ll_status = PBObject.ConnectToNewObject ("JRO.JetEngine")
IF ll_status <> 0 THEN
messagebox("系統錯誤" , "Connect to JRO.JetEngine Error!")
ELSE
string sProvider = "Provider=Microsoft.Jet.OLEDB.4.0;"
string sOldMDB,sNewMDB
sOldMDB = sProvider + "Data Source= " +"E:\aiawenjian\aia.mdb"
sNewMDB = sProvider + "Data Source= " +"E:\aiawenjian\temp.mdb"
PBObject.CompactDatabase(sOldMDB, sNewMDB)
PBObject.DisconnectObject( )
END IF
DESTROY PBObject
版本pb9，這段代碼怎么總是執行錯誤啊，壓縮總是失敗，高手幫看看，謝謝了
uj5u.com熱心網友回復：
這問題沒人知道嗎？uj5u.com熱心網友回復：
星期一告訴你uj5u.com熱心網友回復：
sOldMDB = sProvider + "Data Source= ~"" + "E:\aiawenjian\aia.mdb~""sNewMDB = sProvider + "Data Source= ~"" + "E:\aiawenjian\temp.mdb~""
uj5u.com熱心網友回復：
這個不行啊，一樣的錯誤
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/68315.html
標籤：數據庫相關
上一篇：PBGUIControls900.zip Version 3.0.3 - for PB9.0 誰有這個帶pbl最新版的呢，