Creating message if Contact's birthday is today

Hi,

I found this piece of code on the web.

http://help.lockergnome.com/office/C...ct1002097.html

Its purpose is to send a short greeting to every contact if his/her Birthday falls within today.

The problematic line is: BD = oCurItem.Birthday
(I added it to see the birthday date by placing the curson on it)

After 2-3 Loop cycles I get a 438 error: "...does not support this property" and BD shows: 01/01/4501

What did I do wrong ?

Please Login or Register  to view this content.

Thanks,
Elm

Hi,

This is a very nice "copying job" of Michael Bauers reply at the site where I found the code.

If you'll look a little bit closer you'll probably see that I "obeyed" all proposed instructions but, as said before, it still "does not supply the merchandise".

Could you check the code on your computer to see how it acts there.
If any additional modification is needed - I will appreciate if you'll take care of them.

Any other VBA code providing the requested task (NO third-party software) will be appreciated.

Thanks, Elm

Thanks, ExlGuru

I'll wait "Impatiently" for a decent result...

Elm

Sotty, but now I lost you completely and could not find my way through your last codes.

My request goes like that:

When I manually, add/mark a contacts birthday - it becomes an Annually Recurrent Event with a reminder.

So far so good.

What I need is a code that will open/display a new mail message with some pre-defined blessing.

I will press send after examining the 'to-be sent' message.
[If there are 3 contacts whose Birthday falls on the same date - 3 new messages will be generated and opened - each for every contact.

That is all I need.

Thanks, Elm

I believe you'd be getting the error you're getting if the contact being processed is not an individual contact, but perhaps a distribution list, which does not have a Birthday property.

Try inserting a test to confirm that the contact being processed is a "Contact", with something like this:

Please Login or Register  to view this content.

Or, trap the error when you query the birthday property and it doesn't work.

Hi,

Thanks to all who repliers up to now.

Here is the code I came up with/

Please note the two command which provide a "run-time error 424" if one, or, more recipients have Birthday - today..

Where did I go wrong and what can be done to correct it !?

Thanks, Elm

Please Login or Register  to view this content.