AccessTr.neT
Toplu İban Aktarımı - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Toplu İban Aktarımı (/konu-toplu-iban-aktarimi.html)



Toplu İban Aktarımı - ates2014 - 25/06/2020

Merhaba arkadaşlar,
PERS adında tablomda personeller var,
banka değiştik, Sayfa1 adında personellerin yeni ibanları var,
bu Sayfa1 deki ibanları TC no yu baz alarak,
PERS tablosuna bir defada nasıl aktarabilirim,
uğraştığım kodu aşağıya ekledim.

Sub ibanAktar()
'For ekle = 0 To Me.sayy - 2
Dim guncelle As String
guncelle = "UPDATE PERS SET PERS.BankHesNo=Sayfa1.[IBAN] WHERE PERS.TCNo = Sayfa1.[TC];"
DoCmd.SetWarnings False
DoCmd.RunSQL guncelle
'DoCmd.GoToRecord , , acNext
DoCmd.SetWarnings True
'Next ekle
End Sub


RE: Toplu İban Aktarımı - berduş - 25/06/2020

2 tabloyu TC üzerinden inner Join ile ilişkilendirmeniz gerekmektedir
kabaca aşağıdakine benzer bir kod işinize yarayabilir
UPDATE PERS INNER JOIN Sayfa1 ON PERS.TcNo = Sayfa1.TCNo SET PERS.BankHesNo= [Sayfa1]![TC];



RE: Toplu İban Aktarımı - ates2014 - 25/06/2020

Berduş hocam aşağıdaki hatayı verdi,
şart kısmında.


RE: Toplu İban Aktarımı - ates2014 - 25/06/2020

2 değişiklik yaptım düzeldi,
çok teşekkür ederim


RE: Toplu İban Aktarımı - berduş - 25/06/2020

sayın @ates2014 tablonuzdaki alanların adını bilmiyorum o nedenle hatalı olması normal, sizde hangi alan TC noyu gösteriyorsa o alanın adını yazabilirsiniz.
diğer mesajımda da belirttiğim gibi sadece kabaca yazılmış, kopyala yapıştır yaparken dikkatten kaçmıştır

iyi çalışmalar)