Dışardan Access Dosyasına Erişim (Çözüldü)

[adelphiforumz]

S.A.

Elimde 2 adet mdb dosyası var
program içerisindeki ADOConnection A.mdb dosyasına bağlı
fakat bazen B.mdb dosyasından bilgi okumam ve B.mdb dosyası içerisindeki kayıtları
A.mdb içerisine yazmam gerekiyor okumak için
aşağıdaki gibi Sorgu cümlerini denedim sadece birinci stırdaki yol bilgisi olmayan çalışıyor

ADOQuery1.Sql.Text := Select * FROM B.mdb.T1 //doğru çalışıyor

Fakat dosyanın yolunu belirterek bir türlü bağlantı kuramadım
ADOQuery1.Sql.Text := Select * FROM C:\Test\B.mdb.T1 // çalışmıyor
yada
ADOQuery1.Sql.Text := Select * FROM "C:\Test\B.mdb.T1" // çalışmıyor
yada
ADOQuery1.Sql.Text := Select * FROM 'C:\Test\B.mdb.T1' // çalışmıyor
yada
ADOQuery1.Sql.Text := Select * FROM [C:\Test\B.mdb].T1 // çalışmıyor

yardımcı olabilirmisiniz
Teşekkürler

[pasa_yasar]

Bildiğim kadarıyla o şekilde çalıştıramazsın. İki tane adoconnection yaparsın tabloları aktarırsın birbirine. yaptığın sql kodları ayrıca çalışmaz. select ile tabloyu seçebilirsin bunun içinde örnek tablomuz müşteriler veritabanı b olsun. "select * from b.musteriler" şeklinde çalıştırabilirsin

[sabanakman]

Bir yaşıma daha girdim. Böyle bir çalışma şeklinin olduğundan bile haberim yoktu. İlginç bir bilgi ama yol kısmı için bir yöntem buldum sanırım.

...
aşağıdaki gibi Sorgu cümlerini denedim sadece birinci stırdaki yol bilgisi olmayan çalışıyor

ADOQuery1.Sql.Text := Select * FROM B.mdb.T1 //doğru çalışıyor

Fakat dosyanın yolunu belirterek bir türlü bağlantı kuramadım
ADOQuery1.Sql.Text := Select * FROM C:\Test\B.mdb.T1 // çalışmıyor...

Burada programın çalışma yoluna bakarak çalışma yaptığını farkettim ve önce ChDir ile çalışma yolunu oradaki yola ayarlayıp sorguyu o şekilde yazınca çalıştı.

Kod: Tümünü seç

ChDir('c:\test');
ADOQuery1.Sql.Text := 'Select * FROM B.mdb.T1'
ADOQuery1.Open;

Kodu ile 'c:\test' klasöründeki B.mdb dosyası açılabiliyor.

[adelphiforumz]

S.A.

Şaban Akman'ın verdiği tiyodan yola çıkarak aşağıdaki kodları denedim ve çalıştı
işlemlerden önce aşağıdaki komutun çalıştırıyorum

ChDir(ExtractFilePath(Application.ExeName));

sonra komutları çalıştırıyorum böylelikle aynı dizin içindeki dosyalar için sorun kalmıyor
fakat eğer dizinler farklı ise ozaman sorun oluyor en azından şimdilik bulabildiklerim bunlar
Birde araştırma sırasında dosya yolunu göstermek için şöyle bir iki örnek buldum fakat tam anlayıp çalıştıramadım
belki buradan yola çıkarak başkalarıda birşeyler bulup bizimle paylaşırsa memnun olurum.

Select * From [;DATABASE=C:\Test\A.mdb].T1

//A, B Dosya isimleri
//T1, T2 Tablo isimleri

Select için
Select * FROM B.T1

Insert İcin
INSERT INTO T1 SELECT * From B.T1WHERE T1_A = 14

Delete için
DELETE T1_A FROM B.T1 WHERE T1_A = 14