Form Acılırken Filitre Uygulanmak

Ben tarihi 01/09/2011 den büyük olan ve aynı tarih alanın o günün tarihi dahil +10 gün olan kayıtları getirmesini istiyorum.Form açılırken bu kurala göre açılmasını sağlayabilirmiyiz.

Tşkler.

örneğinizi 2003 formatında ekleyebilirmisiniz?

Sayın Hakkı34,

Dosyanız ektedir.

assenucler kardeşim. Eline sağlık..İstediğim olmuş lakin neden TasarımTermin tarihi neden bozulmuş olabilir.

Sorun çözülmüşür.Herkese çok teşekkür ederim..

Cevap:

VBA Kodu

Private Sub Form_Load()
Dim strWhere As String

strWhere = "DikimTermin >= #" & tarih(DateAdd("d", -10, Date)) & "# And DikimTermin <= #" & tarih(Date) & "#"


DoCmd.ApplyFilter , strWhere

End Sub



Public Function tarih(date1 As Date) As String

tarih = DatePart("m", date1) & "/" & DatePart("d", date1) & "/" & DatePart("yyyy", date1)

End Function

Tasarım termin alanı veri türü "Metin", "Tarih/Saat" değil.. Tablonuzda Tasarım Termin alanı boş..