Toplu senet basma

1 2 3
16/03/2013, 15:10

Yandemir

cumartesi pazar gününe gelenleri pazartesi gününe atıyor. 2 satır kodu var eğer cumartesiyi cumaya pazarı pazartesiye atmak istiyorsan +2 yerine -1 gibi koyman yeterlidir.

Cumartesi-Pazarı Pazartesiye atar
        Tatil = 0
If 1 = Weekday(DateAdd("m", Me.Ay, SonVade + Tatil)) Then Tatil = 1 ' Gün Pazar ise
If 7 = Weekday(DateAdd("m", Me.Ay, SonVade + Tatil)) Then Tatil = 2 ' Gün Cumartesi ise
Cumartesiyi Cumaya Pazarı Pazartesiye atar
        Tatil = 0
If 1 = Weekday(DateAdd("m", Me.Ay, SonVade + Tatil)) Then Tatil = 1 ' Gün Pazar ise
If 7 = Weekday(DateAdd("m", Me.Ay, SonVade + Tatil)) Then Tatil = -1 ' Gün Cumartesi ise
18/03/2013, 23:29

Yandemir

son mesajımdaki örnekler düzenlendi.
1.senet basımı
2.taksit ödeme listesi
3.taksitlerin cumartesi-pazar kontrolü eklendi.
19/03/2013, 01:06

iceman_24

teşekkür ederim elinize kolunuza sağlık hayırlı geceler
15/05/2013, 13:47

iceman_24

abi ben yaptım sonunda çalışmayı yalnız senet yazdır dediğimde yazıylqa kısmını yapamıyorum bir türlü dosyanın hazır halinin linkini koydum abi sana zahmet düzenleye bilirmisin abi



http://turbobit.net/9jwwfr793j68.html
1 2 3