Skip to main content

AccessTr.neT


uyarı mesajı yapamıyorum

uyarı mesajı yapamıyorum

Çözüldü #1
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
Son Düzenleme: 10/10/2013, 12:42, Düzenleyen: esma-26.
Cevapla
Çözüldü #2
Merhabalar;
Örnek uygulamanızı eklerseniz daha çabuk yardım alabilirsiniz.
Cevapla
Çözüldü #3
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ı
Cevapla
Çözüldü #4
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.
Cevapla
Çözüldü #5
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
Son Düzenleme: 11/10/2013, 13:57, Düzenleyen: AMED AMEDOGLU.
Cevapla
Çözüldü #6
Ç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.
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da