Le Mon, 10 Aug 2015 13:41:17 +0200, Jussi Lahtinen <jussi.lahti...@gmail.com> a écrit:
> Sorry to say, but this doesn't seem to be fixed. > > ? DateDiff(Now, DateAdd(Now, gb.Day, 2), gb.Day) > 1 > > > Jussi > > On Sat, Aug 1, 2015 at 7:16 PM, Benoît Minisini < > gam...@users.sourceforge.net> wrote: > >> Le 01/08/2015 17:52, Benoît Minisini a écrit : >> > Le 01/08/2015 17:33, nando a écrit : >> >> Here's an example. >> >> >> >> Dim FirstDate as Date >> >> >> >> FirstDate = Date(2015, 1, 1, 0, 0, 0, 0) >> >> Print DateDiff(firstdate, Date(2015, 8, 1, 00, 00, 00), gb.day) >> 'ok >> >> Print DateDiff(firstdate, Date(2015, 8, 1, 00, 00, 01), gb.day) >> 'ok >> >> Print DateDiff(firstdate, Date(2015, 8, 1, 03, 59, 59), gb.day) >> 'ok >> >> Print DateDiff(firstdate, Date(2015, 8, 1, 04, 00, 00), gb.day) >> >> 'Wrong >> >> Print DateDiff(firstdate, Date(2015, 8, 1, 11, 21, 51), gb.day) >> >> 'Wrong >> >> >> >> 212 >> >> 212 >> >> 212 >> >> 213 <---Wrong should be 212 >> >> 213 <---Wrong should be 212 >> >> >> >> Of course, this is looks like it might be a TimeZone problem. >> >> I am in GMT -5 but daylight savings during the summer it is -4 >> >> >> >> Am I correct to say this is not correct operation? >> >> >> >> -Nando >> >> >> >> >> > >> > Argh, a just too late bug! You did that to spoil my holidats? 8-o >> > >> >> OK, I couldn't let you alone. I have updated the Gambas 3.8 source >> package with the fix for that bug. >> >> Regards, >> >> -- >> Benoît Minisini That's weird, but the examples given (both jussi's and nando's) all work correctly before Benoît's fix (pre-7212), but not after (post-7212) ! Am I missing something completely obvious, or do you get the same behavior ? Here's my test code : Dim FirstDate As Date FirstDate = Date(2015, 1, 1, 0, 0, 0, 0) Print DateDiff(firstdate, Date(2015, 8, 1, 00, 00, 00), gb.day) Print DateDiff(firstdate, Date(2015, 8, 1, 00, 00, 01), gb.day) Print DateDiff(firstdate, Date(2015, 8, 1, 03, 59, 59), gb.day) Print DateDiff(firstdate, Date(2015, 8, 1, 04, 00, 00), gb.day) Print DateDiff(firstdate, Date(2015, 8, 1, 11, 21, 51), gb.day) Print DateDiff(firstdate, DateAdd(firstdate, GB.Day, 2), GB.Day) Output (Before 7212) : 212 212 212 212 212 2 Output (After 7212) : 211 212 212 212 212 1 -- Adrien Prokopowicz ------------------------------------------------------------------------------ _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user