AccessTr.neT

İstediğiniz biçimde hatalı kayıtların görülür olması sağlandı.

Hocam satış ekranında formu temizle butonuna tıkladığım zaman Textbokları temizlemiyor ve genel ekstre açılmiyor

Sayın kenan827,

Alıntı:...Benim istediğim satış adedi yazılmamış satışlar dahil, bütün satışlar satış bilgileri ekranındaki listboxda görünsün veya formu temizde dediğimiz zaman Girdiğiniz veriler kayıtedilsin mi sorusu sorulmasın. Yani Açıklama bölümü dolu olsa bile temizle butonuna tıkladığımız zaman Girdiğiniz veriler kayıtedilsin mi sorusu sorulmasın...

Yukarıda yazılı bulunan özelden talebinize dair,eklediğiniz örnek uygulama incelendiğinde yapılan değerlendirmeler neticesinde,aşağıdaki hususların mevcut olduğu görülmüştür:

1) FRMSATISLAR isimli formunuzun içeriğinde yer alan formu temizlemek için kullandığınız Komut27 butonunun içeriği

'''''''''If MsgBox("Müşteriye yeni mal satışı yapmak istiyor musunuz?", vbYesNo + vbQuestion, "Müşteri Takip") = vbYes Then

    DoCmd.GoToRecord , , acNewRec

    Me.ANAISLEMLER_ISLEMTARIHI.SetFocus

    ''''''Else

'    Me.Undo

    ''''''End If

şeklindedir. Me.Undo ifadesini yeni kayıt açma satırı ifadesinin (DoCmd.GoToRecord , , acNewRec) öncesine yazdığınız takdirde;herhangi bir mesaj çıkmaksızın işlem yapmanızı sağlamak sureti ile bu durumu düzeltebilirsiniz.zaten,hali hazırda;mesaj uyarısı etkisizleştirilmiş durumdadır.)

2) Ekranda belirmesini istemediğiniz GİRDİĞİNİZ VERİLER KAYDEDİLSİN Mİ? sorusunun sorulmasına sebep olan kodlama satırları,formunuzun Güncelleme Öncesinde olay yordamı içerisinde yer almaktadır.

Private Sub Form_BeforeUpdate(Cancel As Integer)

Dim C As Integer

C = MsgBox("<<<< GİRDİĞİNİZ VERİLER KAYDEDİLSİN Mİ? >>>>", vbYesNo + vbQuestion + vbDefaultButton1, " Bilgi")

If C = vbNo Then

DoCmd.RunCommand acCmdUndo

End If

End Sub

Talebinize ve tercihinize göre,bu olay yordamını iptal ettiğiniz takdirde,herhangi bir uyarı mesajı da ekranda belirmemiş olacak,kaydedilmeye dair.

son olarak,EK'te;yukarıdaki taleplerinize dair düzenlenmiş örnek uygulama mevcuttur.inceleyebilirsiniz.bilgilerinize.

İyi çalışmalar,
Saygılar.

Hocam çok, çok teşekkürler ellerinize sağlık tam istediğim gibi olmuş. Hocam ayrıca açıklamalı olarak da yazdığınız için tekrar, tekrar teşekkürler ve saygılar sunuyorum.