AccessTr.neT

Tam Versiyon: Sorgulama Problemi
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2 3 4
Sn Seruz Hocam katkılarınız için teşekkürler. Saygılar...
Merhaba..

Yapılan değerli önerilere alternatif olarak farklı yollarla da sonuca ulaşabiliriz..:

Kod:
sorgu1 = "SELECT SatisTarih, SatisFiyat" _
       & " FROM Query1" _
       & " WHERE SatisFiyat In (SELECT top " & gunsayisi1 & " Sum(tr.SatisFiyat) AS ToplaSatisFiyatb" _
       & " FROM Tbl_Satis_Dagilim AS tr Where month(Query1.SatisTarih)=month(tr.SatisTarih)" _
       & " GROUP BY tr.SatisTarih ORDER BY Sum(tr.SatisFiyat) DESC)" _
       & " ORDER BY Query1.SatisTarih, Query1.SatisFiyat DESC"

Bu da yine yukarıdaki örnek gibi tek sorgu ile farklı bir alternatif olacaktır..:

Kod:
sorgu = "SELECT SatisTarih, SatisFiyat" _
      & " FROM Query1 AS trz" _
      & " WHERE (select count(*) from" _
      & " (SELECT SatisTarih, Sum(SatisFiyat) AS tSatisFiyat FROM Query1" _
      & " GROUP BY SatisTarih ORDER BY Sum(SatisFiyat) DESC)" _
      & " where month(SatisTarih)=month(trz.SatisTarih)" _
      & " and tSatisFiyat>=trz.SatisFiyat)<=Int([Forms]![ReportForm]![CDateCount])"

Kaynakları raporlara da aktarabiliriz tabii..

İlk sorgu where şartından iç sorgu yardımı ile top değerini belirler.. Diğeri ise aylara göre ciroları sıralar.. Çıkan sonuçları istediğimiz gibi yöneterek aynı sonucu farklı yollardan almış oluruz..

İlgi çekici bir soru olduğu için katkım olsun istedim.. İyi çalışmalar..
Sayın Taruz;

İyi akşamlar...

Siz uzman kişilerin farklı çözümleri, bizler için çok önemli kaynak oluyor.

Teşekkür...
Sn Taruz katkınız için teşekkürler.Elinize sağlık. Bir şey dikkatimi çekti. Sizin yaptığınız daha sade gibi ancak hesaplama daha geç oluyor. Sn Seruz Hocamın yaptığı daha hızlı hesaplıyor. Sonuç olarak her ikinize de tekrar teşekkürler. Bu konu ileride işime yarayacak. Saygılar...
Kör istemiş bir göz, şu garip kuluna Allah vermiş 4 göz. Sorunumla meşgul olan herkese teşekkür ediyorum. taruz üstadım sizin yaptığınızı aktarması kolay oldu süper çalışıyor.
hepinize saygılarımı sunuyorum efendim.
Sayfalar: 1 2 3 4