me.Recordset.FindFirst "format([Tarih],"mm.yyyy")=" & format(date,"mm.yyyy")
yadame.Filter = "format([Tarih],"mm.yyyy")=" & format(date,"mm.yyyy")
me.FilterOn = True
me.Recordset.FindFirst "format([Tarih],"mm.yyyy")=" & format(date,"mm.yyyy")
yadame.Filter = "format([Tarih],"mm.yyyy")=" & format(date,"mm.yyyy")
me.FilterOn = True