(14/10/2020, 18:26)feraz yazdı: Eğer gönder tuşuna basınca Metin10 ada aynı veri veri gelsin derseniz yapayım.evet böyle de olur. yaparsanız sevinirim.
Kayıt Eklenince Ses Çalsın
Yarın yapayım abey.
Forma mtn_kayitsayisi adında metin kutusu ekle
Formun açıldığında olayına
Kodu ekle, form açıldığında mtn_kayitsayisi metin kutusuna duyuru tablosundaki kayıt sayısını aktarır.
Formun Zaman Dolduğunda olayındaki koda
kodlarını ekle, tablodaki kayıtlarda değişiklik var ise ses çalacaktır.
Formun açıldığında olayına
Me.mtn_kayitsayisi = DCount("*", "tbl_duyuru")
Kodu ekle, form açıldığında mtn_kayitsayisi metin kutusuna duyuru tablosundaki kayıt sayısını aktarır.
Formun Zaman Dolduğunda olayındaki koda
If Me.mtn_kayitsayisi < DCount("*", "tbl_duyuru") Then
Me.mtn_kayitsayisi = DCount("*", "tbl_duyuru")
SoundMe
End If
kodlarını ekle, tablodaki kayıtlarda değişiklik var ise ses çalacaktır.
Oldu hocam
teşekkürler, Saygılar.
teşekkürler, Saygılar.
Konuyu Okuyanlar: 3 Ziyaretçi