Tarih/Saat Fonksiyonları
DateAdd Fonksiyonu
Bu makalemizde Ms Access platformunda çok yaygın olarak kullanılan Tarih/Saat fonksiyonlarından DateAdd komutunun kullanımından bahsedeceğim.
Açıklama
DateAdd fonksiyonu,
Parametrede belirtmiş olduğunuz tarihe gün, hafta, ay, yıl, hafta, haftasonu, üç aylık dönem, saat, dakika, saniye cinsinden değerler eklemek veya çıkarmak için kullanılır.
Söz Dizimi
DateAdd (aralık,sayı,tarih) |
PARAMETRELER
DEĞER
|
AÇIKLAMA
|
yyyy
|
Yıl
|
q
|
Üç Aylık Dönem
|
m
|
Ay
|
y
|
Yılın Günü
|
d
|
Gün
|
w
|
Hafta Sonu
|
ww
|
Hafta
|
h
|
Saat
|
n
|
Dakika
|
s
|
Saniye
|
- aralık: Tablo-1 de belirtilen değerlerden herhangi birini ifade eder.
- sayı: aralık’ta belirtilen değerin miktarını ifade eder.
- tarih: Başlangıç tarihini ifade eder.
Örnekler
Şimdiki tarihten 1600 gün sonra hangi tarihe gelmektedir. Bunu DateAdd komutuyla rahatlıkla bulabiliriz. Veya personel tablosunda bulunan personellerin işe giriş tarihlerine hizmet yılı eklenerek personellerin emeklilik tarihleri bulunabilir.
Ya da siparişler tablosunda bulunan sipariş tarihine belirli bir gün eklenerek son teslim zamanı elde edilebilir. Bunun gibi örnekler çoğaltılabilir.
SQL Kullanımı ve Sonucu
Yukarıdaki örnekte Oluşturma Tarihine 3 Ay eklenmiş komutun yazımı ve sonucu görülmektedir.
Günün tarihinden 1600 gün sonraki tarih hangi tarihtir. Hemen yazalım.
HangiTarih = DateAdd("d",1600, Date())
Sonuç: 31/07/2023 olacaktır.
Şimdi de personellerin emeklilik tarihini bulalım.
Emeklilik hizmet yılı: 25 Yıl olduğunu biliyoruz (Kadınlarda 20 Yıl)
Emeklilik Tarihi: DateAdd("yyyy",25, "15/01/2002")
Bu personelin emekli olacağı tarih: 15/01/2027 tarihidir.
Bu komutu belli bir saat ya da dakika sonra belli bir işlemin yapılmasınıda sağlayabilirsiniz.
Örneğin şimdiki dakikadan 15 dakika sonra bir komut çalışsın. Örneğimiz nasıl olur;
İşlem: DateAdd("n",15, Time())
if Time = İşlem
......
.....
Endif
Evet Arkadaşlar, işinize hangi parametre yarıyorsa o parametreyi kullanarak istediğiniz işlemleri yaptırabilirsiniz. Bu arada bir noktayı daha belirtmek istiyorum. Eğer belirli tarihten öncesini bulmak istiyorsanız - işaretini kullanmalısınız mesela bugünden 10 yıl öncesi,
DateAdd("yyyy",-10, Date())
VBA Kullanımı ve Sonucu
Günümüzden 5 Yıl sonraki Tarihi bulmak için aşağıdaki komutu kullanabiliriz.
VBA Kod Örneği
|
Option Compare Database
Option Explicit Sub DateAddExample() Dim fark as Date fark = DateAdd("yyyy",5,Date()) 'Return '7.9.2024 End Sub |
Komutun Sayı parametresi mutlaka Tamsayı olmalıdır.
|
Evet Arkadaşlar bir makalemizin daha sonuna gelmiş bulunmaktayız. Yorumlarınızı ve eleştirilerinizi bekliyorum.
Şimdilik,
Hoşcakalın....
0 Yorumlar