>Forms!Formadi!ILKTARIH And <Forms!Formadi!SONTARIH
yazın
ayni formülü
>=Forms!Formadi!ILKTARIH And <=Forms!Formadi!SONTARIH
şekinde yazarsanız zaten between ile ayni işi yapar
Kolay gelsin
Formunuzdaki IIF butonuna
aşağıdaki kontrolü koydum
Kod:
Private Sub ııf_Click()
If Len(ilktarih) > 0 And Len(sontarih) > 0 Then
DoCmd.OpenQuery "ikitarih", acNormal, acEdit
Exit Sub
Else
Forms!deneme!ilktarih = DMin("[Fis_Tarihi]", "Tbl_FisKaydi")
Forms!deneme!sontarih = DMax("[Fis_Tarihi]", "Tbl_FisKaydi")
MsgBox "Tekrar deneyin"
End If
End Sub
değerleri getirecek
tarih alanlarının varsayıllan değerlerine de ayni işlemi yaptım
sorgunuza da > And < kodunu yazdım
bir inceleyin
Kolay gelsin