Aynı field isimlerine sahip iki dbf dosyasını karşılatır

[Delphi08]

Aynı field isimlerine sahip iki dbf dosyasını karşılaştırıp farklı olan bilgileri üçüncü bir dbf dosyasına nasıl yazdırabilirim...

Yardımlarınız için şimdiden teşekkürler.

[fahrettin]

eger dbf'deki butun alanari karsilastiracaksaniz bir dongu icinde her kaydin aynisinin diger tabloda olup olmadigini bir select cümlesi ile karsilastirip diger tabloya farklı kayıtları atmalısınız... Bir tablodaki ilgili kaydin diger tabloda olup olmadigini asagidaki gibi bir cumle ile anlayabilirsiniz where kısmına butun alanları birer kosul oalkra koyup eger KAYIT_SAYISI 0 cikarsa aynı kayıt diger tabloda yok demektir....

Kod: Tümünü seç

Select count(*) as KAYIT_SAYISI
from TABLO2
where ALAN1=1 and ALAN2=35 and AD='Ahmet' ......

Yok eger sadece tek bir alanın iki tablo arasinda karsilastirmasini yapcaksaniz da o zaman bir insert into cümleisni takip eden select cümlesi ile halledebilirsiniz....

[husonet]

Kod: Tümünü seç

where ALAN1=1 and ALAN2=35

Fahrettin abi bu karşılaştırmanın anlamı nedir açıklarmısınız?

Teşekkürler.

[fahrettin]

misal olaraktan verdim.... Yani o an ustunde bulunulan kaydın ALAN1 degeri 1 ise ve ALAN2 degeri 35 ise vs..... bu kaydin diger tabloda olup olmadigi bu şekilde anlaşılır anlamında....

Kolay gelsin....

[sair]

Şöyle olabilir :

SELECT * FROM TABLE1, TABLE2 where Table1.ALAN1<>Table2.ALAN1 and table1.ALAN2<>Table2.ALAN2 and table1.ALAN3<>table2.ALAN3 and ... v.s.

gibi bir kod yazın. Yani alanların tümü de eşit olmayanları bulun. Oluşan bu SQL tablosundan 3 ncü table a bir döngü vasıtası ve INSERT INTO kullanarak aktarın...

Ancak Bu şekilde olabilir gibi geliyor bana...

Sevgiler...

[fahrettin]

Sair bey bu kodun soyle bir dezavantaji var malesef. Bir kartesyen çarpım oluşturacağı için her iki tarafta birbirinden farklı olan kayıt sayilarinin çarpımı kadar sonuç üretir... Fakat belki distinct ile ve sadece tek bir tablodan veri çekmek ile halledilebilir emin olamiyorum denemek lazim....

Bu sonuc elde edilirse bu selectin onune bir insert into koymak yetecektir... Yani dongu olmasina gerek yok...

Kod: Tümünü seç

insert into TABLO1(ALAN1,ALAN2,ALAN3,.... ALAN15)
select ALAN1,ALAN2,ALAN3,.... ALAN15
from ....
where.....

Bu yapı ile bir select cümlesinin sonucu toplu olarak bir tabloya insert edilebilir...

Kolay gelsin...