|
Tips
& Tricks:
Compact dan Repair Database dengan
menggunakan ADO (Jet and Replication Objects)
Berikut ini source-code untuk compact dan
repair Database Access dengan menggunakan Jet and
Replication Objects (JRO).
Proses Compact database dengan JRO akan otomatis melakukan repair/perbaikan
database.
Hasil Proses ini akan disimpan dalam file database baru. Untuk itu, Anda
harus menentukan Nama Database yang akan digunakan sebagai database hasil
proses compact/repair.
Pada contoh di bawah ini, nama database tersebut adalah:
ContohDataBaru.MDB
Langkah-langkah untuk proses compact/repair database adalah:
1. Set Refference untuk "Microsoft Jet And Replication Objects 2.1
Library"
2. Kemudian buat deklarasi variabel untuk JetEngine object, seperti
berikut:
Dim JRO As JRO.JetEngine
Set JRO = New JRO.JetEngine
'..... Statement untuk Compact Database
JRO.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ContohData.mdb",
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ContohDataBaru.mdb;Jet
OLEDB:Engine Type=4"
Pada contoh di atas, ConnectionString
yang digunakan adalah: Engine Type=4
Angka 4 ini mengindikasikan bahwa database yang akan di-compact/repair
adalah Database Access dengan format Access 97.
Jika Anda ingin melakukan compact/repair untuk database format
Access 2000, ganti angka pada Engine Type menjadi 5 (Engine Type=5)
 |
