Skip to main content

AccessTr.neT


Form Üzerine Timer Fonksiyonu İle Veri Kontrolü

Form Üzerine Timer Fonksiyonu İle Veri Kontrolü

#7
(19/12/2015, 21:52)SCavusoglu yazdı: Me.lblBildirim.Caption = "uyarı mesajı"

kodunda tırnak işaretleri arasına istediğiniz uyarı mesajını yazabilirsiniz. "" bu haliyle uyarı olmayacaktır. zira uyarı almak istemiyorum demiştiniz sanıyorum.

kayıt yenilemesi yaptığınızda listbox_adi.requery kodu işinizi görecektir.

Almak istediğim uyarıyı kodda düzeltmiştim son eklediğim örnekte mevcut fakat form açıkken değerlerde değişiklik olursa uyarı kayboluyor. Yani hepsi s_goruldu='EVET' olduğunda bir tanesini HAYIR olarak değiştirince hemen yeniliyor ama uyarıyı kod içerisinde yazdığım halde neden kayboluyor?
Cevapla
#8
(19/12/2015, 22:19)salim.ekiz yazdı:
(19/12/2015, 21:52)SCavusoglu yazdı: Me.lblBildirim.Caption = "uyarı mesajı"

kodunda tırnak işaretleri arasına istediğiniz uyarı mesajını yazabilirsiniz. "" bu haliyle uyarı olmayacaktır. zira uyarı almak istemiyorum demiştiniz sanıyorum.

kayıt yenilemesi yaptığınızda listbox_adi.requery kodu işinizi görecektir.

Almak istediğim uyarıyı kodda düzeltmiştim son eklediğim örnekte mevcut fakat form açıkken değerlerde değişiklik olursa uyarı kayboluyor. Yani hepsi s_goruldu='EVET' olduğunda bir tanesini HAYIR olarak değiştirince hemen yeniliyor ama uyarıyı kod içerisinde yazdığım halde neden  kayboluyor?

Teşekkür ederim sn SCavusoğlu, requery kodunu doğru yere yazınca düzeldi. Şimdi de yeni düşen uyarı için bildirim sesi uyarlamaya çalışıyorum. Tekrar teşekkür ederim.
Cevapla
#9
(20/12/2015, 00:00)salim.ekiz yazdı:
(19/12/2015, 22:19)salim.ekiz yazdı:
(19/12/2015, 21:52)SCavusoglu yazdı: Me.lblBildirim.Caption = "uyarı mesajı"

kodunda tırnak işaretleri arasına istediğiniz uyarı mesajını yazabilirsiniz. "" bu haliyle uyarı olmayacaktır. zira uyarı almak istemiyorum demiştiniz sanıyorum.

kayıt yenilemesi yaptığınızda listbox_adi.requery kodu işinizi görecektir.

Almak istediğim uyarıyı kodda düzeltmiştim son eklediğim örnekte mevcut fakat form açıkken değerlerde değişiklik olursa uyarı kayboluyor. Yani hepsi s_goruldu='EVET' olduğunda bir tanesini HAYIR olarak değiştirince hemen yeniliyor ama uyarıyı kod içerisinde yazdığım halde neden  kayboluyor?

Teşekkür ederim sn SCavusoğlu, requery kodunu doğru yere yazınca düzeldi. Şimdi de yeni düşen uyarı için bildirim sesi uyarlamaya çalışıyorum. Tekrar teşekkür ederim.

Bildirim sesini 
Kod:
Option Compare Database




Option Explicit
Const Yol As String = "C:\Users\salimekiz\Desktop\ACCESS\popup.m4a"




Private Sub btnKapat_Click()
On Error GoTo Err_btnKapat_Click








    If Me.Dirty Then Me.Dirty = False
    DoCmd.Close




Exit_btnKapat_Click:
    Exit Sub




Err_btnKapat_Click:
    MsgBox Err.Description
    Resume Exit_btnKapat_Click
    
End Sub




Private Sub Form_Load()
If DCount("s_goruldu", "tblsinif", "s_goruldu='HAYIR'") <= 0 Then
Me.lblBildirim.Caption = "INCELENECEK URUN YOK"
End If
End Sub




Private Sub Form_Timer()
If DCount("s_goruldu", "tblsinif", "s_goruldu='HAYIR'") > 0 Then
Me.lblBildirim.Visible = Not Me.lblBildirim.Visible
Me.listboxurunler.Requery
Call Shell("C:\Program Files\Windows Media Player\wmplayer.exe /Play /Close " & Yol, vbHide)
Else
Me.lblBildirim.Caption = "INCELENECEK URUN YOK"
Me.listboxurunler.Requery
End If
End Sub




Private Sub listboxurunler_DblClick(Cancel As Integer)
Dim acilacak_form As String
Dim kriter As String
    acilacak_form = "frmkalitedetay"
    kriter = "[s_id]=" & Me![listboxurunler]
    DoCmd.OpenForm acilacak_form, , , kriter
End Sub

şeklinde çözüm bulduk ama sürekli tekrarlamasını bir kez uyarı verecek şekilde veya timerdan bağımsız belirleyeceğimiz 5 dakika gibi bir süreyle yapabilir miyiz acaba?
Cevapla
#10
sayın salim.ekiz,

EK'te;
bahsettiğiniz talebinize yönelik olarak;
bir kez yanıp sönmeli (tek uyarı vermeli) şekilde hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
.rar YeniUrunBildirimiYazdirma3-ATOZ.rar (Dosya Boyutu: 95,21 KB | İndirme Sayısı: 13)
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#11
(20/12/2015, 16:11)atoz112 yazdı: sayın salim.ekiz,

EK'te;
bahsettiğiniz talebinize yönelik olarak;
bir kez yanıp sönmeli (tek uyarı vermeli) şekilde hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.

Sayın atoz112, öncelikle çok teşekkür ederim. Verdiğiniz örneği inceledim ve bir kaç ekleme yapmak adına forum üzerinde bir çok çalışmaları inceledim ama bir türlü yapmak istediğimi çalışmama bu örneklerden uyarlayamadım.

Aslında yapmak istediğim 2 şey var öncelikli olarak;

1. olarak yapmak istediğim GÖRÜLDÜ alanı HAYIR olan listboxdaki bir ürünün çift tıklayarak "frmkalitedetay" formunu açınca ürünü direk incelenmiş yani "tblSinif" tablomda s_goruldu=EVET yazdırmak istiyorum. EVET yazdırdıktan sonra da tblSinifTotal tablomdaki Toplam alanına da "tblSinif" tablosundaki s_goruldu=HAYIR olanların toplamını yazdırmak istiyorum.


2. olarak da frmkalite formunun timer özelliğinde düzenli bir karşılaştırma yaptırmak ve tblSinif tablosundaki s_goruldu=HAYIR olanların toplamı tblSinifTotal tablosundaki Toplamdan büyükse tblSinif tablosundaki seslibildirimkontrolsuresi alanında girilen süre aralıklarında sesli uyarı verdirmek istiyorum. Bana bir yol gösterebilir misiniz. Teşekkür ederim.
.rar YeniUrunBildirimiYazdirma4.rar (Dosya Boyutu: 104,76 KB | İndirme Sayısı: 6)
Son Düzenleme: 21/12/2015, 01:48, Düzenleyen: salim.ekiz.
Cevapla
#12
Sayın salim.ekiz,

Öncelikle bir hususu belirtmekte ve buna dikkat çekmekte fayda var kanısındayım.

Konuyu açarken yazdığınız talebiniz ile 11.mesaj itibarı ile yazdığınız talepleriniz birbirinden farklı amaçlı ve niteliktedir.

Dolayısı ile de,bu konunuzdaki talebinizin sunulan bilgi ve örnek paylaşımları ile çözüme ulaştığı düşüncesi söz konusudur.

Bu nedenle,öncesinde bu konunuzun Cevaplanmış Sorular kategorisi içerisine taşınmasının uygun olacağı kanısındayım.buna dair çözüm elde edildiğini ifade eden bir talepte bulunmak sureti ile buna zemin oluşturabilirsiniz.

akabinde de,bu 11.mesajdaki talebiniz doğrultusunda lütfen yeni konu açınız ve açacağınız bu yeni konunuza yine talebinize uygun örnek uygulamanızı dahil ederek devam işlemini sağlamaya özen gösteriniz.

Böylece,hem bu konunuzun farklı niteliklere bürünmesini engellemiş ve mesaj yoğunluğunu azaltmış olursunuz hem de yeni taleplerinizi yeni konudan sürdürülmesini sağlamış olursunuz.

Ayrıca,ikinci talebinizde şöyle bir yanılgı olsa gerek kanısındayım.var sayılsın ki birinci talebinizdeki işlem yerine getirildi ve listeden seçilen kayda göre açılan detay formunuzda istenen değişim yapılarak o kayda ait Görüldü alanı için HAYIR olan değer EVET olarak değiştirildi ve akabinde,HAYIR değeri içeren kayıtların kaç adet olduğuna dair toplam değer bahsi geçen diğer tablonuza yazıldı.bu yazılma bilgileri de geçerli ve güncel olacağından nihai sonuç olacaktır.

Bu nedenle,ikinci talebiniz olan tablolar arası toplam kayıt değeri karşılaştırmasının da bir gereği veya anlamı olmayacaktır.çünkü;zaten güncel geçerli bir toplam değeri içereceği için HAYIR değeri barındıran kayıt sayısı aynı çıkacaktır.BÜYÜK ya da KÜÇÜK çıkma olasılığı olmayacaktır.eğer ki bu güncelleme işlemi başarılı şekilde gerçekleştirilirse.

Alıntı:...tblSinif tablosundaki seslibildirimkontrolsuresi alanında girilen süre aralıklarında sesli uyarı verdirmek istiyorum...

ifadeniz ile ne kast ettiğinizi anlayamadım.bu süre aralıkları ne için kullanılmaktadır ve bu uyarı verme işlemini nerede,nasıl uygulamak istiyorsunuz? bilgilendirmelerde bulunmanız verimli olacaktır.bilginize…iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da