girilen tarihe göre hafta numarası

hanedan0812

Access Cevaplanmış Soruları

5496

11/02/2009, 19:23 #3

mehmetdemiral

Bul

Uzman

Adı Soyadı: Me.... De....

Yaşı: 59

Konum: Samsun

Ofis Versiyonu: Ofis 2013 32 Bit

Son Oturumu: 01/04/2024,18:42

Yorumları: 5.123

Konuları: 224

Kayıt Tarihi: 30/10/2008

Teşekkür Puanı: 1.947

Mesleğiniz: Öğretmen

Önce değişkenleri tanımlayalım

Kod:

Dim Tarih1 As Date

Dim Mesaj As String

Sonra Tarih1'e yılın ilk gününü atayalım.

Kod:

Tarih1 = "01.01.2009"

Tarih2 değerine de form üzerinden veya başka bir yerden istenen tarih değerini atayalım

Kod:

Tarih2 = "11.01.2009"

”ww” kullanarak değeri hafta olarak istediğimizi belirtelim.

Kod:

Mesaj = DateDiff("ww", Tarih1, Tarih2)

Msg penceresi ile tarih1'den tarih2'ye kadar olan haftaları saydıralım ve ekrana getirelim.

Kod:

MsgBox Mesaj & "Haftadır."

Kolay gelsin. Takıldığınız yerde bana dönün.

Görmedim. Sayın eşrefigit çok daha kolay bir yöntemle yapmış. Ama benim örnekte tarih aralığı saydırıldığı için belki farklı amaçlarda işe yarayabilir. Mesela farklı yıllardan tarihler yazsanız da arada kaç haftsa olduğunu sayacaktır. Belki o da başka bir işe yarar..

İnadına, ille de Accesstr.net...

Cevapla