uyarı mesajı yapamıyorum - Baskı Önizleme

uyarı mesajı yapamıyorum - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: uyarı mesajı yapamıyorum (/konu-uyari-mesaji-yapamiyorum.html)

uyarı mesajı yapamıyorum - esma-26 - 10/10/2013

formumu açtığımda
If ÇEK_TARİHİ = Date Then
Beep
MsgBox "BUGUN ÖDEME var", vbOKOnly, ""
Else
MsgBox "BUGUN ÖDEME yok", vbOKOnly, ""
End If
böyle bir işlem yapmak istiyorum fakat
hata veriyor veya tarihi dikkate almıyor neyapmalıyım acaba

Cvp: uyarı mesajı yapamıyorum - serdar_20 - 10/10/2013

Merhabalar;
Örnek uygulamanızı eklerseniz daha çabuk yardım alabilirsiniz.

Cvp: uyarı mesajı yapamıyorum - esma-26 - 10/10/2013

ya benim yapmak istediğim bugun tarihte ödemem varsa formu açtığımda bugun ödemen var desin ve o ödemeleri getirsin yoksa ödemen yok desin istiyorum her yolu denedim ama olmadı

Cvp: uyarı mesajı yapamıyorum - serdar_20 - 10/10/2013

Yukarıda yazdığınız kodların çalışması lazım. Belki bir yerde hata yapmış olabilirsiniz bu yüzden örnek uygulamanızı eklerseniz ve ne gibi hata aldığınızı belirtirseniz.

Cvp: uyarı mesajı yapamıyorum - AMED AMEDOGLU - 11/10/2013

ESMA HANIM kodlarınızı e postama atarsanız yardımcı olabilirim

If ÇEK_TARİHİ = Date Then
Beep
MsgBox ("BUGUN ÖDEME var") ""
Else
MsgBox ("BUGUN ÖDEME yok" ""
End If
çalışır

Cvp: uyarı mesajı yapamıyorum - Puletin - 19/10/2013

Çek tarihlerinin tutulduğu tablonuzun adının tbl_Cekler olduğunu var sayarsak.

Formunuzun açıldığında olay yordamına

Private Sub Form_Load()

If Dlookup ("ÇEK_TARİHİ", "tbl_Cekler", "ÇEK_TARİHİ=Date()") Then

MsgBox ("Bu gün ödemeniz var"), vbExclamation, "Ödeme Uyarısı"

Else

MsgBox ("Bu gün ödemeniz yok"), vbExclamation, "Ödeme Uyarısı"

End If

End Sub

yazarsanız istediğiniz olacaktır.
Kolay gelsin.