Skip to main content

AccessTr.neT


Buton Ve Msgbox Sorunu

Buton Ve Msgbox Sorunu

Çözüldü #1
Merhabalar 
Formuma Düğme ekledim . Kaydı kaydetme düğmesi. Arından Kod VB kısmından Msgbox ekledim evet-hayır diye sorması için. Buton geliyor fakat şöyle bir sorunum var, hayır'a tıklasam da veriyi kaydediyor. Ayrıca hiçbir şeye tıklamadan verileri girip formu kapatsam da tabloya giriş yapıyor.
Son Düzenleme: 20/05/2017, 02:04, Düzenleyen: onurgs59.
Cevapla
#2
(20/05/2017, 01:17)onurgs59 yazdı: Merhabalar 
Formuma Düğme ekledim . Kaydı kaydetme düğmesi. Arından Kod VB kısmından Msgbox ekledim evet-hayır diye sorması için. Buton geliyor fakat şöyle bir sorunum var, hayır'a tıklasam da veriyi kaydediyor. Ayrıca hiçbir şeye tıklamadan verileri girip formu kapatsam da tabloya giriş yapıyor.

Merhaba,

ilgili kod kısmını burada paylaşın, bir bakalım.
Cevapla
#3
Sayın Onur, kaydet düğmesine yazdığınız kodlar ilişkisiz formlarda ve denetimlerde çalışır. İkişkisiz formda kaydetme komutu olarak "DoCmd.RunCommand acCmdSaveRecord" (Tırnaklar yok) kullandığınızı varsayıyorum. MsgBox ı If ile kullanıyorsunuz, Evet seçildiğinde kaydet komutu, Hayır seçildiğinde de Me.Undo (Geri al) komutu çalışmalı. Sanırım temel sorununuz kaydetme yöntemleriyle ilgili. Bunu ilişkili formlarda da yapabilirsiniz ancak her veriyi kontrol etmeniz gerekir. Benim hala üzerinde çalıştığım bir VT var. Onu sizinle paylaşayım. Mutlaka faydası olur. Kolay gelsin.
.rar EAokbvt - 24.04.2017.rar (Dosya Boyutu: 187,75 KB | İndirme Sayısı: 19)
Vatanını en çok seven, görevini en iyi yapandır!!!
Son Düzenleme: 20/05/2017, 11:15, Düzenleyen: biberli33.
Cevapla
#4
Merhabalar cevaplarınız için teşekkür ederim öncelikle.
@nbatman  ve @biberli33  . Access bilgim fazla değil örnek alarak yaptım. Ben direk üst kısımdan Düğme seçtim ordan kayıt işlemleri kaydı kaydet butonunu seçip ileri dedim. Sıfırdan kod yazarak yapmadım yani. Ardından bu düğmeye visual basic üstünden Komut Click ekleyerek şunu yazdım.

 If MsgBox("Rezervasyon oda bilgilerini güncellemek istiyor musunuz?", vbQuestion + vbYesNo) = vbYes Then


  DoCmd.SetWarnings False
            DoCmd.RunSQL "UPDATE Odalar SET Durum = 'Rezerve' WHERE (((Odalar.Oda_No)=" & [Oda_No] & "))"
            DoCmd.SetWarnings True
Son Düzenleme: 20/05/2017, 13:26, Düzenleyen: onurgs59.
Cevapla
#5
Sayın Onur, gönderdiğim VTyi incelerseniz yapmak istediğinizi nasıl yapacağınızı görebilirsiniz. Sizin yaptığınız şekilde her türlü kayıt yapar. Bunu engellemek için butonun tıklandığında olayına Makro atamak yerine VBA kodlarıyla komut verebilirsiniz. Bu bence daha kolay. Kolay gelsin.
Vatanını en çok seven, görevini en iyi yapandır!!!
Cevapla
#6
(20/05/2017, 20:55)biberli33 yazdı: Sayın Onur, gönderdiğim VTyi incelerseniz yapmak istediğinizi nasıl yapacağınızı görebilirsiniz. Sizin yaptığınız şekilde her türlü kayıt yapar. Bunu engellemek için butonun tıklandığında olayına Makro atamak yerine VBA kodlarıyla komut verebilirsiniz. Bu bence daha kolay. Kolay gelsin.

Dediğinizi tam olarak anlayamadım. Şimdi ben düğme oluşturmak yerine açıklama kutusu oluşturup buna kod ile komut mu vereyim ? 
Yani ne oluşturup komut yazayım. Düğme kısmından ben direk Kaydı kaydet düğmesi oluşturuyorum bu yanlış mı?
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task