dcsimg
Results 1 to 2 of 2

Thread: Palm Sunday Fell On ...

  1. #1

    Thread Starter
    PowerPoster Code Doc's Avatar
    Join Date
    Mar 2007
    Location
    Omaha, Nebraska
    Posts
    2,355

    Palm Sunday Fell On ...

    ... April Fools' Day last Sunday. During the last 100 years:

    (1) How many times did Palm Sunday fall on April 1?
    (2) When will it occur again?

    Anybody know? Just curious.
    Doctor Ed

  2. #2
    MS SQL Powerposter szlamany's Avatar
    Join Date
    Mar 2004
    Location
    CT
    Posts
    17,860

    Re: Palm Sunday Fell On ...

    Call the formula in a loop

    Code:
    Public Function EasterDate2(Yr As Integer) As Date
        Dim D As Integer
        D = (((255 - 11 * (Yr Mod 19)) - 21) Mod 30) + 21
        EasterDate2 = DateSerial(Yr, 3, 1) + D + (D > 48) + 6 - ((Yr + Yr \ 4 + _
                D + (D > 48) + 1) Mod 7)
    End Function

    *** Read the sticky in the DB forum about how to get your question answered quickly!! ***

    Please remember to rate posts! Rate any post you find helpful - even in old threads! Use the link to the left - "Rate this Post".

    Some Informative Links:
    [ SQL Rules to Live By ] [ Reserved SQL keywords ] [ When to use INDEX HINTS! ] [ Passing Multi-item Parameters to STORED PROCEDURES ]
    [ Solution to non-domain Windows Authentication ] [ Crazy things we do to shrink log files ] [ SQL 2005 Features ] [ Loading Pictures from DB ]

    MS MVP 2006, 2007, 2008

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Featured


Click Here to Expand Forum to Full Width