KONEKSI
DATABASE ACCESS KE DELPHI
Buat
tabel pada MS.Access :
Nama
database : dbpenjualan
Nama
tabel : tbarang
Kalau
Officenya 2007, save as dulu ke 2003.
Tutup
Accessnya, buka Delphi :
Masukkan
komponen ADOTable (dari tab ADO)
ke form :
Settinglah
properti pada ADOTable1 sebagai
berikut :
Connectionstring : klik
…, klik Build, pilih Microsoft Jet 4.0 OLE DB Provider, cari
alamat databasenya, pilih dbpenjualan, klik open.
Table
Name : tbarang
Active :
True
Kembali
ke form. Tambahkan komponen Datasource
(dari tab Data Access).
Cari
properti Dataset, isikan ADOTable1.
Tambahkan
komponen DBGRID (dari tab Data
Control).
Cari
properti DataSource, isikan Datasource1.
Tambahkan
komponen DBNavigator (dari tab Data
Control).
Cari
properti DataSource, isikan Datasource1.
Gambar
di atas jika tabel sudah ada isinya, seharusnya tabel masih kosong dan datanya
diisi ketika dijalankan.
PENCARIAN
DATA MENGGUNAKAN ADOTABLE
Tambahkan
komponen ADOTable, dan setting
properti ConnectionString, Table Name, Active seperti pada point
1.
Tambahkan
komponen Edit dan Button untuk pencarian data.
Klik
2x pada button dan masukkan kode programnya :
ADOTable1.Locate('kodebarang',
Edit1.Text, [LoPartialKey]);
Jalankan :
PENCARIAN
DATA MENGGUNAKAN ADOQUERY
Pada
form baru, tambahkan komponen ADOQuery dari
tab ADO,
isikan properti sbb :
ConnectionString : klik …, klik Build, pilih Microsoft Jet 4.0 OLE DB
Provider, cari alamat databasenya, pilih dbpenjualan,
klik open.
SQL :
klik …, isikan pada kotak :
Select * from tbarang
Active :
True
Hubungkan
ADOQuery dengan sebuah Datasource dan DBGrid (caranya sama seperti pada ADOTable pada point 1).
Tambahkan
komponen Edit dan Button.
Klik
2x button dan isikan kode program untuk pencarian kodebarang pada tabel barang:
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select
* from tbarang where kodebarang=:carikode');
ADOQuery1.Parameters.ParamByName('carikode').Value:=Edit1.Text;
ADOQuery1.Open;
Jalankan
:
MENGAMBIL
ISI TABEL LAIN MENGGUNAKAN LOOKUP FIELDS
1. Pendahuluan
->>
Sebelumnya,
pastikan bahwa di database yang bernama dbpenjualan,
kita sudah membuat 2 tabel (tbarang
dan tjual) sebagai berikut :
terimakasih :)
0 komentar:
Posting Komentar