Toplu Evet/hayır

1 2
06/01/2020, 13:39

nazurabi

Private Sub btn_toplugiris_click()
On Error GoTo iptal
Docmd.SetWarnings False
Docmd.RunSQL "UPDATE (SELECT *FROM TBL_SEVK_BİLGİ_ALT_TABLO) SET TBL_SEVK_BİLGİ_ALT_TABLO.SEVK_BİLGİSİ_GİRİLDİ_Mİ='1' WHERE TBL_SEVK_BİLGİ_ALT_TABLO.BELGE_NU İS NOT NULL;"
Docmd.SetWarnings True
İptal:
Exit sub
End sub


Bu şekilde çalışıyor arkadaşlar Windows güncellemesi sonucu where ve update çalışmazsa önce select ile tüm verileri çekin sonra tanimlama yapin, sağlıcakla kalin iyi forumlar
06/01/2020, 13:53

berduş

çözümü paylaştığınız için teşekkürler.
İyi çalışmalar
07/01/2020, 01:42

nazurabi

Rica ederim sizlere de iyi çalışmalar ilgi alakaniz için ben teşekkür ederim ?
1 2