Sorgu için Tarih fonksiyonları ????

[tosuntosun]

merhaba dostlar

şimdi şirket içi bir programcık hazırlıyorum

Query hazırladım

ekranda aynı formda 3-4 adet buton ile aynı query ile farklı sonuçlar almak istiyorum.
Başlangıç ve bitiş tarih aralığı vercem
1. Buton ile.. mevcut ayın başı ve sonunu ekrandaki text lere yazması
2. Buton ile.. 1 ay önceki ayın ilk gün ve son gününü
3. Buton ise.. son 3ayın ilk ve son günü (mevcut aydan önceki son 3 ay)
4. Buton ile.. yılın ilk ve son günü ki..
me.text1.value = "01/01/2007" ama.. gelecek yıl da.. değiştirmek istemiyorum.. o sebeple..

sorry

birde.. bazı programcıklar gördüm..eskiden di çooookk eskiden..
(delphide yapıyor idik)
combo ya basınca tarih ekranı geliyor.. filan. access de neler var bilmiyorum
enson MSAccess de programcıklar hazırlamıştım

şimdiki 2003 ama yakında 2007 kullanma ihtimalim zayıf da olsa var..

yardımcı olabilirseniz sevinirim..
selamlar

 

[mehmetdemiral]

Bahsettiğiniz işlemler access'te şöyle yapılıyor- en azından ben öyle yapabiliyorum- Bir form üzerindeki farklı birçok düğme farklı sorguları çalıştırır veya farklı sorgulardan referans alan raporları açabilir. Bu arada tek sorgu üzerinden bunları yapmak için belki sql sorguları ile mümkün olabilir.

 

[beab05]

Merhaba;

DateSerial(Year(Date), Month(Date), 1) ' şimdiki ay

DateSerial(Year(Date), Int((Month(Date) - 1) / 3) * 3 + 1, 1) 'Geçerli 3 ay

DateSerial(Year(Date), 1, 1) 'Geçerli yıl

DateSerial(Year(Date), Month(Date) - 1, 1) ' Son ay

DateSerial(Year(Date), Int((Month(Date) - 1) / 3) * 3 + 1 - 3, 1) ' Son 3 ay

DateSerial(Year(Date) - 1, 1, 1) ' Son yıl

DateAdd("yyyy", -1, Date) + 1 'Son 12 ay

DateWeekFirst(Date) ' Geçerli hafta

 

[tosuntosun]

arkadaşım.. verdiğin kodu aratınca good abi de.. bana microsoft un sitesinden bunları buldum
herkesle paylaşıyorum

saygı ve teşekkürler


http://support.microsoft.com/kb/210604/tr

Geçerli ay:
DateSerial(Year(Date()), Month(Date()), 1)
• Gelecek ay:
DateSerial(Year(Date()), Month(Date()) + 1, 1)
• Geçerli ayın son günü:
DateSerial(Year(Date()), Month(Date()) + 1, 0)
• Gelecek ayın son günü:
DateSerial(Year(Date()), Month(Date()) + 2, 0)
• Önceki ayın ilk günü:
DateSerial(Year(Date()), Month(Date())-1,1)
• Önceki ayın son günü:
DateSerial(Year(Date()), Month(Date()),0)
• Geçerli üç aylık dönemin ilk günü:
DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 1, 1)
• Geçerli üç aylık dönemin son günü:
DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 4, 0)
• Geçerli haftanın ilk günü (Pazar günü = 1. gün varsayarak):
Date() - WeekDay(Date()) + 1
• Geçerli haftanın son günü:
Date() - WeekDay(Date()) + 7
• Geçerli haftanın ilk günü (Seçenekler iletişim kutusundaki ayarlar kullanılarak):
Date() - WeekDay(Date(), 0) + 1
• Geçerli haftanın son günü:
Date() - WeekDay(Date(), 0) + 7

 

[beab05]

E ne güzel işte aratınca bulunuyormuş, siz şimdi bunları tek sorguda kullanabilirsiniz. Ben elimde hazır bulunanları koydum sadece..

 

[tosuntosun]

değerli arkadaşım

senin verdiğin kodları aratınca netice oldu.. kodu bilseydim help den de bulurdum

site ve paylaşım şekliniz gerçekten çok faydalı

selamlar

 

[pcman]

Geçerli hafta

Yaptığım aramada Bu sayfayı buldum

Geçerli Haftayı görüntülemek istiyorum

DateWeekFirst(Date) ' Geçerli hafta çalışmıyor

 

[pcman]

DatePart("ww", Date, 2)
Bu şekildeymiş

İyi arama örneklerin incelenmesi herzaman sorularımıza çözüm olur...