SQL ile iki tarih aralığında sorgu yapmak

[hamzasaricicek]

Merhabalar,

Aşağıda yer alan sorgumu tekrar tekrar yazmak yerine döngüye alıp kullanmak istiyorum. O ay kaç çekiyor ise ayın son gününün yerine o yazıp tamamlanacak.

Set SatisGruplariRs = Baglan.Execute("Select SUM(FATFISGENTOPLAM) From FATFIS Where FATFISTIPI='3' and FATFISIPTALFLAG='0' and FATFISCARKOD LIKE 'M2.%' and FATFISTAR BETWEEN '2011-01-01' and '2011-01-31' GROUP BY FATFISTIPI")

1.ay B3 hücresinden başlayarak 2.ay B4, 3.ay B5 hücresine diye devam edecek.

.Range("B3").CopyFromRecordset SatisGruplariRs


Şimdiden teşekkür ediyorum..

 

[hamzasaricicek]

Kimse ilgilenmeyecekmi

yapmak istediğim sadece aşağıdaki SQL sorgusunu döngü içine almak

Select * From FATFIS Where FATFISTAR BETWEEN '2011-01-01' and '2011-01-31'

yukarıda koyu renkle belirttiğim yerleri değişkenlerden alarak 12 ayın döngüsünü oluşturacak.

 

[Zeki Gürsoy]

Merhaba,

Anladığım kadarıyla aylık toplamları görmek istiyorsunuz...

Bu şekilde deneyin...

Set SatisGruplariRs = Baglan.Execute( _
    "Select DATENAME(month, FATFISTAR) AS AYADI, SUM(FATFISGENTOPLAM)  AS AYLIKTOPLAM From FATFIS " & _
    "Where (FATFISTIPI = '3' and FATFISIPTALFLAG = '0' and " & _
    "FATFISCARKOD LIKE 'M2.%') " & _
    "GROUP BY AYADI")
    
    [b3].CopyFromRecordset SatisGruplariRs