Managing Dynamic Emails in EMailDatabaseObject Macros

[Jonny]

Managing Dynamic Emails in EMailDatabaseObject

I have a query that alerting once an employee has a birthday.
Now I wish that "..wishes" report will be sent to that employee.

I can put in AutoExec only static email , a@b.com but not relevant employee email from a table..

 

[theDBguy]

Hi. I think what you’ll have to do is use SetLocalVar and maybe use DLookup or SearchForRecord to get the email from the table. You can then use the LocalVar in your macro.

 

[Jonny]

Hi. I think what you’ll have to do is use SetLocalVar and maybe use DLookup or SearchForRecord to get the email from the table. You can then use the LocalVar in your macro.

Could you please help with the syntax? The DB is attached.

 

[theDBguy]

Could you please help with the syntax? The DB is attached.

Hi. Unfortunately, I'm not really good with macros. Would you like to have a VBA solution instead?

 

[Jonny]

Hi. Unfortunately, I'm not really good with macros. Would you like to have a VBA solution instead?

Yes, sure.. please.

 

[theDBguy]

Yes, sure.. please.

Okay, you could try the following:

Dim strEmail As String


strEmail = Nz(DLookup("e-mail","Query1"),"")


DoCmd.SendObject acSendNoObject, , , strEmail, , , "Subject", "Message Body", True