1 - Sorgular ile: bu defa 2 sorgu yeterli oldu
a) en küçük tarihi bulup 4 dk ekleyen KucukTrh sorgusunun Sql kodu
SELECT Tablo1.[NO], Min(DateAdd("n",4,[Tablo1]![Tarih])) AS MinTrh
FROM Tablo1
GROUP BY Tablo1.[NO];
b) sonuç sorgusu olan KucukSorgu sorgusunun Sql koduSELECT Tablo1.[NO], Min(DateAdd("n",4,[Tablo1]![Tarih])) AS MinTrh
FROM Tablo1
GROUP BY Tablo1.[NO];
---------------------------->||<--------------------------------2 - fonksiyon ve sorgu ile
a) modüldeki Sirala fonksiyonunun kodu
Public Function Sirala(No As String) As Date
TrhX = DMin("Tarih", "tablo1", "[NO]='" & No & "'")
Sirala = DateAdd("n", 4, TrhX)
End Function
b) modüldeki fonksiyonu kullanarak çalışsan SrgSirala sorgusunun Sql koduSELECT Tablo1.ID, Tablo1.[NO], Tablo1.Tarih, Tablo1.Durum
FROM Tablo1
WHERE (((Tablo1.Tarih)<Sirala([NO])));
https://resim.accesstr.net/do.php?img=10612