Access Sorgusunda Alan Adı Değişkeni

(01/07/2020, 18:13)feraz yazdı: Dim ayBas As Date, aySon As Date değişkenlerini tanımladım.

filtre kodunada alttakilerini ekledim.

ayBas = DateSerial(Year(Date), Month(Date - 1), 1)

aySon = DateSerial(Year(Date), Month(Date - 1) + 1, 0)

select case yede ekledim ve Combobox10 ada fitre yazdım.Yani combo10dan geçen ay seçilirse listelenir.

Case "Geçen Ay": rs.Open "select * from Ajandam where fix(" & alan & ") between  " & Fix(CDbl(CDate(ayBas))) & " and " & Fix(CDbl(CDate(aySon))) & "", baglan, 1, 1

@feraz hocam destek için teşekkür ederim.

Kaydet, Sil, Güncelle, Filtreler dahil tamam, Sadece yineleme tarihi seçme olayı kaldı. Onunda basit taslağını kurdum, Yeni bir kayıt eklemek istediğinizde göreceksiniz. Bu çalışma için son bir desteğinizi rica ediyorum.

Çalışmanın son halini ekledim.. Bu haliyle bile muhteşem oldu..Şimdiden teşekkür ederim.

bitis = Format(TextBox3 & " " & ComboBox10.Value & ":" & ComboBox11.Value, "dd.mm.yyyy hh:mm")

bitis = hangitarih

(02/07/2020, 17:01)feraz yazdı: Doğru anladımmı bilemiyorum yinede yazayım.

bitis = Format(TextBox3 & " " & ComboBox10.Value & ":" & ComboBox11.Value, "dd.mm.yyyy hh:mm")

bunu silip

bitis = hangitarih

eklermisiniz.

(02/07/2020, 17:47)kanakan52 yazdı:

(02/07/2020, 17:01)feraz yazdı: Doğru anladımmı bilemiyorum yinede yazayım.

bitis = Format(TextBox3 & " " & ComboBox10.Value & ":" & ComboBox11.Value, "dd.mm.yyyy hh:mm")

bunu silip

bitis = hangitarih

eklermisiniz.

@feraz hocam bu değil istediğim maalesef. Niye anlaşamadık bu kez Öncedende yazmıştım o kısmın mantığını alayamadım diye üstad.
Resimlerle anlatabilirseniz yarın bakabilirim.

(02/07/2020, 17:59)feraz yazdı:

(02/07/2020, 17:47)kanakan52 yazdı:

(02/07/2020, 17:01)feraz yazdı: Doğru anladımmı bilemiyorum yinede yazayım.

bitis = Format(TextBox3 & " " & ComboBox10.Value & ":" & ComboBox11.Value, "dd.mm.yyyy hh:mm")

bunu silip

bitis = hangitarih

eklermisiniz.

@feraz hocam bu değil istediğim maalesef. Niye anlaşamadık bu kez Öncedende yazmıştım o kısmın mantığını alayamadım diye üstad.
Resimlerle anlatabilirseniz yarın bakabilirim.

hocam, dert oldum başına farkındayım, akşam hazırlamaya çalışacağım.