Rezervasyon Tarih Ve Saat Kriterine Göre İlgili Etiketi Renklendirme.

1 2
14/01/2019, 12:41

Oğuz Türkyılmaz

(14/01/2019, 12:07)haliliyas yazdı: her 2 kontrol için mi (hem aktif hem de pasif )

Pasif için düşündüm aklıma aktif kontrolü gelmedi aktifide içine alsa ne değişir mevcut durumda bilemiyorum.
14/01/2019, 13:29

berduş

zamanlama kodunu aşağıdaki kodla değiştirip dener misiniz
gerçi bu kod da her yarım saatte bir aynı soruna sebep oluyor ama şimdilik yapabildiğim bu maalesef
Private Sub Form_Timer()
Me.txtSaat.Requery

If Format(Time(), "HH:mm") = Format(Time(), "HH:00") Or Format(Time(), "HH:mm") = Format(Time(), "HH:30") Then
Call LblRezerv
Me.txtTarih.Requery
End If
End Sub
14/01/2019, 14:15

berduş

kodu güncelledim 1 defa kontrol edip bırakıyor
Private Sub Form_Timer()
Me.txtSaat.Requery
If Me.txtSaat.Value = Format(Me.txtSaat.Value, "HH:00:00") Or Me.txtSaat.Value = Format(Me.txtSaat.Value, "HH:30:00") Then
Call LblRezerv
Me.txtTarih.Requery
End If
End Sub
 ayrıca formgirişin load olayına da aşağıdaki kodu ekleyin end sub kısmından hemen önceye

Call LblRezerv
14/01/2019, 15:55

Oğuz Türkyılmaz

(14/01/2019, 14:15)haliliyas yazdı: kodu güncelledim 1 defa kontrol edip bırakıyor
Private Sub Form_Timer()
Me.txtSaat.Requery
If Me.txtSaat.Value = Format(Me.txtSaat.Value, "HH:00:00") Or Me.txtSaat.Value = Format(Me.txtSaat.Value, "HH:30:00") Then
Call LblRezerv
Me.txtTarih.Requery
End If
End Sub
 ayrıca formgirişin load olayına da aşağıdaki kodu ekleyin end sub kısmından hemen önceye

Call LblRezerv

Tamamdır halil bey elinize sağlık titremede kesildi böylece.
1 2