Ben hiç fonksiyonu denemedim şimdi denedim doğrudur şuan oldu elinize sağlık çok teşekkürler. Allah razı olsun
Tarihleri Arasındaki Veriler
Dosyanızı indirdim ama maalesef tam kontrol etme imkanım olmadi
Sonuçları iyice kontrol ettiniz mi kesin doğru mu? Alel acele yaptığım denemede tam olarak sizin tablonuzdaki sonucu vermedi sanki.
Sonuçları iyice kontrol ettiniz mi kesin doğru mu? Alel acele yaptığım denemede tam olarak sizin tablonuzdaki sonucu vermedi sanki.
(27/11/2020, 14:25)berduş yazdı: Dosyanızı indirdim ama maalesef tam kontrol etme imkanım olmadi
Sonuçları iyice kontrol ettiniz mi kesin doğru mu? Alel acele yaptığım denemede tam olarak sizin tablonuzdaki sonucu vermedi sanki.
1 milyona yakın veride çalıştırdım bu fonksiyonu sonuçları aldım kontrollerini sağlıyorum şuan
ben tablodaki ID alanlarına bakmışım o nedenle sonuçlar hatalı görünmüş
ama şöyle bir sorun gördüm: ben +4 dakikadan küçük olanları almışım, siz eşit ve küçük almışsınız galiba?
çalışma ektedir
1 - Sorgular
a) KucukTrh en küçük tarihleri bulan sorgunun Sql kodu
2 - fonksiyonlu sorgu
a) Sirala fonksiyonu
ama şöyle bir sorun gördüm: ben +4 dakikadan küçük olanları almışım, siz eşit ve küçük almışsınız galiba?
çalışma ektedir
1 - Sorgular
a) KucukTrh en küçük tarihleri bulan sorgunun Sql kodu
SELECT Tablo1.[NO], Min(DateAdd("n",4,[Tablo1]![Tarih])) AS MinTrh
FROM Tablo1
GROUP BY Tablo1.[NO];
b) KucukSorgu Sonuç sorgusuSELECT Tablo1.ID, Tablo1.[NO], Tablo1.Tarih, Tablo1.Durum
FROM Tablo1 LEFT JOIN KucukTrh ON Tablo1.[NO] = KucukTrh.[NO]
WHERE (((Tablo1.Tarih)<=CDate([KucukTrh]![MinTrh])));
----------------------------->||<---------------------------------2 - fonksiyonlu sorgu
a) Sirala fonksiyonu
Public Function Sirala(No As String) As Date
TrhX = DMin("Tarih", "tablo1", "[NO]='" & No & "'")
Sirala = DateAdd("n", 4, TrhX)
End Function
b) sorgu koduSELECT Tablo1.ID, Tablo1.[NO], Tablo1.Tarih, Tablo1.Durum
FROM Tablo1
WHERE (((Tablo1.Tarih)<=Sirala([NO])));
Hocam bir öncekini de kontrol ettiğimde verilerin doğru geldiğini gördüm teşekkürler
rica ederim)
iyi çalışmalar
iyi çalışmalar
Konuyu Okuyanlar: 1 Ziyaretçi