sayın aliyorga;
tablolarını
Sql server'a atıp denedim.Sql Server'da tablolarınızda verilerinizde sıkıntı yok,tablo yapısından v.s kaynaklanan bir sorun veya hata meydana gelmedi.
Sorunun çalışmanızda kullandığınız Module21 içerisindeki kodla alakalı diye düşündüm.Şöyleki;
Function trz(hafta As Integer, Gun As Integer) As Date
Dim ilkgun
ilkgun = ("01.01." & Year(Date)) 'Formata Dikkat!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
trz = (DateAdd("ww", hafta - 1, ilkgun) - Weekday(DateAdd("ww", hafta - 1, ilkgun))) + Gun 'Haftanın ilk günü "pazar" olarak baz alınacaksa +1 iptal edilmeli..
End Function
Function trz2(hafta As Integer, Gun As Integer) As Date
Dim ilkgun
ilkgun = ("01.01." & Year(Date) - 1)
trz2 = (DateAdd("ww", hafta - 1, ilkgun) - Weekday(DateAdd("ww", hafta - 1, ilkgun))) + Gun 'Haftanın ilk günü "pazar" olarak baz alınacaksa +1 iptal edilmeli..
End Function
Function trz3(hafta As Integer, Gun As Integer) As Date
Dim ilkgun
ilkgun = ("01.01." & Year(Date) + 1)
trz3 = (DateAdd("ww", hafta - 1, ilkgun) - Weekday(DateAdd("ww", hafta - 1, ilkgun))) + Gun 'Haftanın ilk günü "pazar" olarak baz alınacaksa +1 iptal edilmeli..
End Function
Burada tarih formatı ##.##.#### şeklinde ve tarih ayracı "."
Siz bilgisayarınızın Bölge ve dil seçeneklerinden Tarih ayracını "." şeklinde değiştirin.
Bende sorun çıkmadan çalıştı.
Sql -server dan veri tabanını silmiyorum.
Eğer ki dediğim şekilde olmazsa Farklı çözümler arayacağız.
Bölge ve dil seçeneklerinde tarih ayarları ekteki gibi olacak.
GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !