tablolar arası veri transferi

1 2
01/06/2015, 11:23

access acemisi

Değerli Arkadaşlar
2 adet tablom var.
Kisi tablosundaki id_kisino ve adisoyadi alanındaki veriyi aynen ek tablosundaki idk_kisino ve adisoyadi alanına otomatik taşımak istiyorum.Şu anda 2 kayıt var.
kisi alanındaki tabloya her veri girildikçe,ek tablosundaki ilgili alana  otomatik gelsin istiyorum.
Yardımınızı bekliyorum.selam
01/06/2015, 13:34

POWER

Kişi tablosunu güncelleyen formunuzuda ekleyiniz...
01/06/2015, 16:44

access acemisi

(01/06/2015, 13:34)POWER yazdı: Kişi tablosunu güncelleyen formunuzuda ekleyiniz...

Sn POWER
Kisi formunu ekledim ama diğer tablonunda formu eklenecek mi  bilmiyorum.
İlginize teşekkür.Düzenleme yaparsanız sevinirim selamlar
01/06/2015, 18:58

SCavusoglu

Tablo ilişkilendirmelerinde, Bilgi tutarliligina zorla alanındaki tıkı kaldırıp aşağıdaki kodu bir butonun tıklandığı olayına  ekleyiniz..


Kod:
Private Sub Command7_Click()
'uyari mesajini kapa
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO ek (idfk_kisino,AdiSoyadi) VALUES ('" & Me.id_kisino & "','" & Me.AdiSoyadi & "')"
DoCmd.SetWarnings True
'uyari mesajini ac
End Sub
02/06/2015, 01:28

access acemisi

Sn ScCavusoglu

İlginize teşekkür.
Sizin dediğiniizi uyguladım.Evet kısmen isteğim olmuş.Şöyle bir eksiklik var.
kisi formunda her girilen veri için buton tıklamak gerekiyor.Bundan şu anlaşılıyor; hangi kayıt üzerinde tıklanırsa, o veri transfer oluyor.
Ben istiyorumki...Bir anda girilen örneğin 10 adet veri , anında öbür ek dosyasına aktarılsın.Mesela,kisi kaydı yapılırken arka planda ek  tablosuna kayıt yapılsın.Ya da ,Bunun için Form olayına böyle bir kod yazılabilir mi bilmiyorum.Formdan çıkıldığında yeni eklenen veriler , ek dosyasına aktarılsın şeklinde.Selam saygılar.
02/06/2015, 05:50

ozanakkaya

kisi isimli formun kapandığında olayına aşağıdaki kodu ekleyiniz.

DoCmd.RunCommand acCmdSaveRecord
DoCmd.SetWarnings False

DoCmd.RunSQL "INSERT INTO ek ( idfk_kisino, AdiSoyadi ) SELECT tbl_ektablosundaolmayan.id_kisino, tbl_ektablosundaolmayan.AdiSoyadi FROM (SELECT kisi.id_kisino, kisi.AdiSoyadi, kisi.meslegi FROM ek RIGHT JOIN kisi ON ek.[idfk_kisino] = kisi.[id_kisino] WHERE (((ek.idfk_kisino) Is Null))) AS tbl_ektablosundaolmayan;"
DoCmd.SetWarnings True

Ayrıca, aynı veriyi tekrar farklı tabloya kaydetmekteki amacınızı belirtir misiniz?
1 2