AccessTr.neT

(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.

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

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, 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.