Hatalı bilgileri silmek

1 2
03/09/2014, 01:25

mehmetdemiral

İstediğiniz biçimde hatalı kayıtların görülür olması sağlandı.
03/09/2014, 12:32

kenan827

Hocam satış ekranında formu temizle butonuna tıkladığım zaman Textbokları temizlemiyor ve genel ekstre açılmiyor
03/09/2014, 16:10

atoz112

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.
03/09/2014, 18:08

kenan827

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.
1 2