read more......

 

 

 

 

 

 

 

 

 

 

 

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)