[
attachment=31792]Hocam
Açılan kutudan herhangi bir ay seçtikten sonra sorgu çalıştır butonu ile seçilen aya ait tutar bilgilerini görmek istiyorum.
Saygılar
açıklamaları forma yaptığınız gibi konuya da eklemeniz daha iyi olur. (forum kuralları)
sorguya aşağıdaki kodu yazıp dener misiniz?
SELECT Tablo1.Tarih, Tablo1.Tutar
FROM Tablo1
WHERE (((Year([Tarih]))=Year([Formlar]![Frm1]![Tarih])) AND ((MonthName(Month([Tarih])))=[Formlar]![Frm1]![Açılan_Kutu7]));
bu arada
yapılmaması gereken ölümcül hatalar konusunu incelemenizi öneririm
iyi çalışmalar
(21/03/2020, 13:12)berduş yazdı: [ -> ]açıklamaları forma yaptığınız gibi konuya da eklemeniz daha iyi olur. (forum kuralları)
sorguya aşağıdaki kodu yazıp dener misiniz?
SELECT Tablo1.Tarih, Tablo1.Tutar
FROM Tablo1
WHERE (((Year([Tarih]))=Year([Formlar]![Frm1]![Tarih])) AND ((MonthName(Month([Tarih])))=[Formlar]![Frm1]![Açılan_Kutu7]));
bu arada yapılmaması gereken ölümcül hatalar konusunu incelemenizi öneririm
iyi çalışmalar
Hocam tam istediğim gibi çalıştı.Teşekkür ederim.
Saygılar
Sorgu yapılmadan alttaki kodlada olabilir alternatif olarak.
Tutar metin kutusu ilişkisiz olmalı.
Private Sub Komut6_Click()
Tutar.Value = Dlookup ("Tutar", "Tablo1", "MonthName(Month([Tarih]))='" & Açýlan_Kutu7.Value & "'" & _
" And year([Tarih]) = " & Year(Tarih.Value) & "" & _
" And day([Tarih]) = " & Day(Tarih.Value) & "")
End Sub
(21/03/2020, 14:42)feraz yazdı: [ -> ]Sorgu yapılmadan alttaki kodlada olabilir alternatif olarak.
Tutar metin kutusu ilişkisiz olmalı.
Private Sub Komut6_Click()
Tutar.Value = Dlookup ("Tutar", "Tablo1", "MonthName(Month([Tarih]))='" & Açýlan_Kutu7.Value & "'" & _
" And year([Tarih]) = " & Year(Tarih.Value) & "" & _
" And day([Tarih]) = " & Day(Tarih.Value) & "")
End Sub
Hocam ilginize teşekkür ederim.
Sizin verdiğiniz kodlarda textbox a tarihi yazıyorum alttaki textbox a açılan kutudan seçtiğim aya ait tutarı getiriyor.
bunu da örnek olarak saklayacağım.
Saygılar