Senin, 03 Desember 2012

 Langkah-langkah membuat koneksi database MS Access


  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;
   
Langkah 3
Atur desainnya seperti berikut ditampilkan pada gambar form dibawah ini

Langkah 4
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;
   
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
with ADOConnection1 do
  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
with ADOConnection1 do
  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
    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