Tablolar için güncelleme sorgusu kullanilabilir
Ama çalışmanız pek anlaşılmıyor nereye ne yazıp ne yapınca bu güncelleme yapılacak hangi alanda yapılacak belli değil.
Bul Ve Değiştir Sorunu
(01/03/2022, 09:57)berduş yazdı: Tablolar için güncelleme sorgusu kullanilabilir
Ama çalışmanız pek anlaşılmıyor nereye ne yazıp ne yapınca bu güncelleme yapılacak hangi alanda yapılacak belli değil.
merhaba
hocam saolsun vakit emek vermiş çokda güzel olmuş
ama bende okuyunca derdimi anlatamamışım onu farkettim
ekteki örnekte daha net yazdım
sağdaki kutudan tarihi alacak solda içinde tarih yazan yere koyacak , cümle içinde yani gececek, ama cümlenin tamamını siliyor ben sadece tarih yerine verdiğim ibare gelsin istiyorum
ben farklı yollarla denedim denedim olmadı
dün geceden beridir de deniyorum 1 haftadır aramadığım bakmadığım yazı kalmadı
yaşdanmıdır nedir kafa almıyor sanırım.
Son Düzenleme: 01/03/2022, 10:24, Düzenleyen: Bilal Demirci.
(tarih) burada tarih kelime olarak var değil mi? yani tarih kelimesi olacak 11.11.2111 gibi bir değer değil?
ve sadece ekrandaki kaydın verileri değişecek tüm tabloların değil?
ve sadece ekrandaki kaydın verileri değişecek tüm tabloların değil?
ozaman çalışmanızda neden tarihin kendisi değil de kelimesi var,
örneğinizi ona göre hazırlamanız gerekmez miydi?
örneğinizi ona göre hazırlamanız gerekmez miydi?
aşağıdaki kod işinize yarayabilir ben sadece formdaki ilk 3 metin için yaptım diğerlerini de siz buna uygun yapabilirsiniz
tüm tablo güncellenecekse yukardaki yerine aşağıdaki kod kullanılabilir
çalışmanızı yeniden belirttiğiniz yapıda yeniden yüklerseniz ona uygun bir çözüm önermeye çalışırız
Me.metin1 = Replace(Me.metin1, "(tarih)", Me.Metin11)
Me.Metin2 = Replace(Me.Metin2, "(tarih)", Me.metin22)
Me.metin3 = Replace(Me.metin3, "(tarih)", Me.metin33)
tüm tablo otomatik olarak güncellenecekse o durumda sorgu da yapılabilirtüm tablo güncellenecekse yukardaki yerine aşağıdaki kod kullanılabilir
xSQL = "update tablo1 set "
xAlan = "metin1=Replace(metin1, '(tarih)', Metin11), " & _
"metin2=Replace(metin2, '(tarih)', Metin22), " & _
"metin3=Replace(metin3, '(tarih)', Metin33), " & _
"metin4=Replace(metin4, '(tarih)', Metin44), " & _
"metin5=Replace(metin5, '(tarih)', Metin55), " & _
"metin6=Replace(metin6, '(tarih)', Metin66), " & _
"metin7=Replace(metin7, '(tarih)', Metin77), " & _
"metin8=Replace(metin8, '(tarih)', Metin88), " & _
"metin9=Replace(metin9, '(tarih)', Metin99), " & _
"metin10=Replace(metin10, '(tarih)', Metin100) "
xSQL = xSQL & xAlan
CurrentDb.Execute xSQL
çalışmanızı yeniden belirttiğiniz yapıda yeniden yüklerseniz ona uygun bir çözüm önermeye çalışırız
Konuyu Okuyanlar: 2 Ziyaretçi