Ado ile Access veritabanı kullanımı

Yazan: karflake | Tarih

24 Ekim 2007 | Yorum

Yorum Yok

Henüz puan verilmemiş

Loading ...

Delphi’den Access veritabanlarına erişmek için ADO teknolojisi kullanılır. Aşağıdaki örnekte aşağıdaki kayıt desenine sahip bir Access veritabanına erişilecektir. Erişilecek dosyanın adı “bilgi.mdb” dir veritabanında üç adet tablo bulunmaktadır.

Tablo Adı	Alan adı	Veri türü	Boyut
ayar	tip	Sayı	Bayt
	sifre	Metin	30
sarkici	sarkici_no	Otomatik sayı	Uzun tamsayı
	sarkici	Metin	50
sozler	sarkici_no	Sayı	Uzun tamsayı
	sarki_adi	Metin	100
	sarki_sozu	Not

Bu tip bir Access veritabanına Delphi’den ulaşmak için şu işlemler yapılır:

1. Önce form üzerine bir tane AdoConnection bileşeni konulur. Bu bileşen veritabanına fiziksel olarak ulaşmak için gereken ayarları içerir. Bu bileşenin kod yardımıyla ayarlamak için aşağıdaki kodlar ana formun create olayına yazılır:

PLAIN TEXT

DELPHI:

//Aşağıdaki komut veritabanının fiziksel yolunu belirtiyor
adoconnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;'+ 'Data Source='+GecerliKlasoruAl+'bilgi.mdb;'+'Mode=Share Deny None;'+ 'Persist Security Info=False';

2. Veritabanına fiziksel olarak ulaşıldıktan sonra tablolara ulaşılması gerekir. Bunun için adodataset nesnesi kullanılır. Bu nesnenin CommandText özelliğine gereken SQL cümlesi yazılır.

PLAIN TEXT

DELPHI:

//Öncelikle adodateset’lerin connection özellikler ayarlanıyor
adodataset1.Connection:=ADOConnection1;
adodataset2.Connection:=ADOConnection1;
//Aşağıdaki komut sozler tablosındaki kayıtları sarki_adi sirasına göre çekiyor
adodataset1.CommandText:='select * from sozler order by sarki_adi ';
//Gerektiğinde veritabanındaki başka bir tabloya, başka bir adodataset ile bağlanılır
adodateset2.commandtext:='select * from sarkici order by sarkici';
//Daha sonra adodatasetler aktif hale getirilir
adodataset1.Active:=true;
adodataset1..Active:=true;