Langkah-langkah membuat koneksi database MS Access
Langkah 1
Buat aplikasi baru
Langkah 2
Tambahkan beberapa object kedalam Form.
Edit1: TEdit;
Label1: TLabel;
Button1: TButton;
Button2: TButton;
ADOConnection1: TADOConnection;
Label1: TLabel;
Button1: TButton;
Button2: TButton;
ADOConnection1: TADOConnection;
Langkah 3
Atur desainnya seperti berikut
ditampilkan pada gambar form dibawah ini
Sekarang silahkan anda klik 2x
object ADOConnection1. Tunggu beberapa saat hingga muncul tampilan kotak
dialog seperti terlihat pada gambar dibawah ini.
Langkah 5
Lanjutkan dengan menekan tombol Build.
Tunggu beberapa saat hingga didapatkan tampilan kotak dialog seperti terlihat
pada gambar dibawah ini.
Langkah 6
Pilih Microsoft Jet 4.0 OLE DBProvider
Langkah 7
Selanjutnya silahkan anda tekan
tombol Next. Tunggu beberapa saat hingga didapatkan tampilan program
seperti terlihat pada gambar dibawah ini.
Langkah 8
Setelah itu, silahkan anda tentukan
nama databasenya. Untuk menentukan nama database, silahkan anda tekan tombol
disebelah kanan kotak inputan nama database hingga didapatkan tampilan kotak
dialog seperti gambar dibawah ini.
Langkah 9
Pilih file database microsoft
access. Sebagai contoh silahkan anda lihat tampilan dari gambar dibawah diatas.
Langkah 10
Selanjutnya silahkan anda tekan
tombol Open. Tunggu beberapa saat hingga didapatkan tampilan seperti
gambar dibawah ini.
Langkah 11
Apabila file database MS Access diletakkan
pada folder yang sama dengan folder program aplikasi, maka anda bisa langsung
menentukan nama databasenya seperti dicontohkan pada tampilan gambar dibawah
ini.
Langkah 12
Untuk menguji koneksi apakah sudah
benar atau tidak. Silahkan anda tekan tombol Test Connection. Dan
apabila berhasil, maka akan ditampilkan informasi seperti terlihat pada
tampilan gambar dibawah ini.
Langkah 13
Lanjutkan dengan menekan tombol OK.
Langkah 14
Tekan tombol OK lagi.
Langkah 15
Silahkan anda tekan tombol OK sekali
lagi hingga didapatkan tampilan form dari program yang anda buat.
Langkah 16
Sekarang silahkan anda lanjutkan
dengan menentukan property LoginPrompt dari ADOConnection1 dengan
nilai False.
Langkah 17 Kemudian silahkan anda tambahkan library ComObj
pada bagian uses. Untuk lebih jelasnya silahkan anda lihat potongan kode
program dibawah ini.
…
…
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB, ComObj;
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, ADODB, ComObj;
…
…
Langkah 18
Setelah itu, silahkan anda tentukan
kode program didalam event OnClick pada tombol Sambungkan. Isikan
kode program didalamnya seperti terlihat pada potongan kode program dibawah
ini.
…
…
procedure TForm1.Button1Click(Sender: TObject);
begin
begin
with ADOConnection1 do
begin
begin
Connected := False;
ConnectionString := ‘Provider=Microsoft.Jet.OLEDB.4.0;Data Source=‘ +
Trim(Edit1.Text) + ‘;Persist Security Info=False;‘;
Connected := True;
end;
end;
…
…
Langkah 19
Kemudian untuk melakukan proses
validasi untuk mengetahu keberhasilan koneksi dan menghandle error akibat
system maka kode program diatas bisa diganti menjadi seperti terlihat pada
potongan kode program dibawah ini.
…
…
procedure TForm1.Button1Click(Sender: TObject);
begin
begin
with ADOConnection1 do
begin
begin
try
Connected := False;
ConnectionString := ‘Provider=Microsoft.Jet.OLEDB.4.0;Data Source=‘ + Trim(Edit1.Text)
+ ‘;Persist Security Info=False;‘;
Connected := True;
ShowMessage(‘Koneksi berhasil‘);
except
on EOleException do
begin
begin
ShowMessage(‘Koneksi gagal ‘);
end;
end;
end;
end;
…
…
Langkah 20
Silahkan anda compile program
aplikasi tersebut dengan menekan tombol Ctrl + F9.
Langkah 21
Lanjutkan dengan menekan tombol F9
hingga program siap untuk dijalankan.
Langkah 23
Tentukan nama databasenya dengan
nama Test.mdb.
Langkah 24
Tekan tombol Sambungkan.
Langkah 25
Apabila program berhasil, maka
program akan terkoneksi dengan database.
Langkah 26
Namun apabila gagal, maka akan
ditampilkan pesan error seperti terlihat pada tampilan gambar dibawah ini.
Langkah 27
Program sudah selesai anda buat.
Sekarang silahkan anda tekan tombol Keluar.
Tidak ada komentar:
Posting Komentar