21/02/2017, 23:44
kadirba72
Bu arada visual basic te problemi çözdüm, fakat Atoz112 hocamın Access dosyasını inceleyerek oldu. Birçok türk ve yabancı forumlar da bu konu hakkında konu açtım ama bir çoğu sallama cevap vererek zaman kaybına uğrattı beni. Biri bana İD ile sorgulatma yap dedi. Mantığı da şuydu, visual basic de filter yapınca sadece günleri alıyordu buda demek oluyor ki 2.ay için arama yaptığın da tekrar 1.ayın kayıtlarını karşına çıkarmasıydı. İD mantığın da , tarih'i filter yapıp ardından o tarihte ki İD değerini aldırarak sorgumuzu sorunsuz şekilde tamamlamıza sebep olacaktı.
Visual basic kodunu da ayrıcana paylaşacam, belki ilerde birine yardımım dokunur.
Teşekkürler accesstr.net ailesi.
Visual basic kodunu da ayrıcana paylaşacam, belki ilerde birine yardımım dokunur.
Kod:
Private Sub Command3_Click()
On Error Resume Next
Adodc1.Recordset.Filter = "Tarih like '" & Text205 & "%' "
Adodc1.RecordSource = "SELECT Sum(id) AS Topla FROM Tablo1"
Text3.Text = DataGrid1.Columns(76)
Adodc1.Recordset.Filter = "Tarih like '" & Text177 & "%' "
Adodc1.RecordSource = "SELECT Sum(id) AS Topla FROM Tablo1"
Text4.Text = DataGrid1.Columns(76)
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "SELECT Sum(yikama) AS Topla FROM Tablo1 WHERE id Between '" & Text3.Text & "' And '" & Text4.Text & "'"
Adodc1.Refresh
Text22.Text = DataGrid1.Text
End Sub
Teşekkürler accesstr.net ailesi.