Sayın alperadn01,
Alıntı:...ancak ben sizin dediğiniz olayı uyarlayamadım...
diye belirtmişsiniz.uyarlamaya çalıştığınız örneğinizi o hali ile eklemeniz size geri dönüşlerde takıldığınız hususlar konusunda daha katkı sağlayıcı olurdu.
Güncelleme butonu tıklandığında olay yordamı içerisine aşağıdaki kodların eklenmesi yeterli olacaktır.
DoCmd.RunCommand acCmdSaveRecord
DoCmd.SetWarnings False
'sadece ilgili kaydın güncellenmesi için
'DoCmd.RunSQL "UPDATE dosya SET [şirket adı]='" & [Açılan Kutu27] & "',[işe başlama]='" & [Metin29] & "' WHERE Kimlik=" & [Kimlik]
'şirket ismi seçilecek şirket adına göre
'bütün o şirket ismini içeren kayıtların
'toptan güncellenmesi için
DoCmd.RunSQL "UPDATE dosya SET [şirket adı]='" & [Açılan Kutu27] & "',[işe başlama]='" & [Metin29] & "' WHERE [şirket adı]='" & [Metin16] & "'"
DoCmd.SetWarnings True
DoCmd.GoToRecord , , acNewRec
Ek’te;bir önceki ve şimdiki yapılan açıklamalar nezdinde eklediğiniz uygulamanız üzerinde uyarlanması yapılmış olarak örnek çalışma mevcuttur.inceleyebilirsiniz.
kodlama içerisinde de anlatımları görüleceği üzere iki
Sql kodu hazırlanmıştır.etkisiz bırakılmış olan birinci
Sql kodunda kimlik değerine göre sadece o kayıt ile ilgili güncelleme söz konusudur.aktif bırakılan diğer
Sql kodunda ise,değiştirilmek üzere seçili olan şirket ismini içeren tüm o şirket ismindeki kayıtların güncellenmesi sağlanmıştır.burada kullanılacak
Sql kodu sizin tercihinize göre kullanımınıza sunulmuştur.
uygulamayı indirip çalıştırmadan önce iki kopyasını çıkartınız ve sonrasında iki sorguyu deneyecek şekilde
Sql kodlarını her iki uygulamada da aktif / pasif yaparak denemeniz ve sonuçları öyle görmeniz yerinde olacaktır.bilgilerinize.
iyi çalışmalar,
saygılar.
deneme-ATOZ.rar
(Dosya Boyutu: 36,6 KB | İndirme Sayısı: 11)