Skip to main content

AccessTr.neT


Toplu Kayıt Hk.

Toplu Kayıt Hk.

Çözüldü #7
Merhabalar,
Evet gönderdiğiniz örnek çalışıyor fakat listboxta birşey dikkatimi çekti. afterupdata kısmı makro yazmışsınız sanırım onu nasıl yapabilirim farklı bir örnekte. O yüzden başka bir yere uyarlamaya çalıştığımda çalışmıyor.
Cevapla
Çözüldü #8
liste kutusunun güncelleştirme sonrasında olayındaki katıştırılmış makroyu ben eklemedim. Bu mevzuyu farklı bir forma ekleyecekseniz yardımcı olmak için yazacağım vb kodu farazi olur, çünkü denetim isimlerini, veri türünü vs. bilmiyorum.

Benim eklediğim kod faturano metin kutusunun güncelleştirme sonrasında olayında.

DoCmd.RunSQL "UPDATE Table1 SET FaturaNo = '" & FaturaNo & "' WHERE (((Plaka)='" & Plaka & "') AND (Not (ID)=" & ID & "));"

Bu kodu farklı formda kullanacaksanız;
Table1 yerine tablo adını,
FaturaNo, Plaka ve ID yerine tablodaki alan adını,
"& FaturaNo &" gibi & arasına yazılanlarda formdaki denetim adıdır.

Ancak tablodaki alan adının veri türüne göre WHERE kısmı değişiklik gösterebilir.
Yapamazsanız yeni örneği ekleyin, yardımcı olmaya çalışalım.
Cevapla
Çözüldü #9
Ektedir.
.zip erkan_ornek.zip (Dosya Boyutu: 194,91 KB | İndirme Sayısı: 8)
Cevapla
Çözüldü #10
Takıldım bir türlü çözemiyorum. Örneği ekte görebilirsiniz. İlginiz için çok teşekkürler.
Cevapla
Çözüldü #11
(06/06/2014, 11:48)rknbrlz yazdı: [Resim: opimage.png]Takıldım bir türlü çözemiyorum. Örneği ekte görebilirsiniz. İlginiz için çok teşekkürler

Örneğinizi aşağıdaki bağlantıda anlatılanlara göre düzenlemezseniz ileride daha çok uğraşacaksınız.

Yapılmaması gereken ölümcül hatalar

Kodun düzeltilmiş hali
DoCmd.RunSQL "UPDATE SYS_INBOUND SET [PickUp Freight Invoice] = '" & [PickUp Freight Invoice] & "' WHERE (((Service_Invoice)='" & [Service Invoice] & "')AND (Not ([_ID])=" & [_ID] & "));"
Cevapla
Çözüldü #12
Merhabalar,
Haklısınız ve bu konuda size katılıyorum fakat malesef önceden oluşturulmuş bir database üzerinde çalışıyorum ve bu database aktif olarak kullanılıyor. Bu yüzden database tanımlamalarında değişiklik yapamıyorum. Şimdilik mevcut üzerinden devam etmeliyim. Bu arada sizin uyarladığınız kodu yazdım fakat bu sefer tüm kayıtlarda değişiklik yapıyor. Sadece ilgili service invoice yerine hepsine kayıt atıyor. Bu neden olabilir?
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task