A.S.C Filtre, Grafik ve Raporlama Eklentisi

Tags
Author: yahzee_61 - Replies: 4 - Views: 854
EĞER KODU YAZIM TEKNİĞİ -ÇÖZÜMÜ-
Merhaba arkadaşlar. yıllık izin yazacağım personelin 18 yaşından <= , 50 yaşından>= ise 20 gün izin hakkı bu kritere uymuyorsa normal izin hak ediş kuralları geçerli olsun. Kodu aşağıda ki gibi yazdım ama başaramadım. form üzerinde kıdemi hesaplaya alan birde yaşını hesaplayan alan var.

Bugun = Date
Yl = Year(Bugun) - 1
Giris = Me.işe_başlama
CalSure = Bugun - Giris
Yas = Yas


Dim Yas As String
Yas "<= 18 Or Yas >= 50 "
HakIzin = 20
Else
If CalSure <= 364 Then
HakIzin = 0
El