in VBA you would concatenate the addresses in the To property dynamically
wow works greatGina Whipp has a nice blog on sending multiple emails from MS Access see here:-
Access Diva Send eMail to Multiple Recipients
Access-Diva provides custom databases using Microsoft Access utilizing SQL Server when called for.www.access-diva.com
Set rs = CurrentDb.OpenRecordset("SELECT * FROM CustomerDeclineemails ")
no it does not refer to any formsDoes the query CustomerDeclineemails refer to any forms for criteria that aren't open or missing values?
SELECT [DAW Sheet Data File].Registration, [DAW Sheet Data File].Sequence, [CSM/CSA].[e-mail] AS emailCSM, [CSM/CSA].Division, [CSM/CSA_1].[e-mail] AS emailCSA
FROM ([DAW Sheet Data File] INNER JOIN [CSM/CSA] ON [DAW Sheet Data File].CSM = [CSM/CSA].UserName) INNER JOIN [CSM/CSA] AS [CSM/CSA_1] ON [DAW Sheet Data File].CSA = [CSM/CSA_1].UserName
WHERE ((([DAW Sheet Data File].Registration)=[Forms]![Menu]![StatusRegFilter].[Form]![DAWSheetStatus]![Registration]) AND (([DAW Sheet Data File].Sequence)=[Forms]![Menu]![StatusRegFilter].[Form]![DAWSheetStatus]![Sequence]));
It does refer to forms - see the bits in Red below;no it does not refer to any forms
all data in the query seems fine when opened manually
sorry, misunderstoodIt does refer to forms - see the bits in Red below;
SELECT [DAW Sheet Data File].Registration, [DAW Sheet Data File].Sequence, [CSM/CSA].[e-mail] AS emailCSM, [CSM/CSA].Division, [CSM/CSA_1].[e-mail] AS emailCSA
FROM ([DAW Sheet Data File] INNER JOIN [CSM/CSA] ON [DAW Sheet Data File].CSM = [CSM/CSA].UserName) INNER JOIN [CSM/CSA] AS [CSM/CSA_1] ON [DAW Sheet Data File].CSA = [CSM/CSA_1].UserName
WHERE ((([DAW Sheet Data File].Registration)=[Forms]![Menu]![StatusRegFilter].[Form]![DAWSheetStatus]![Registration]) AND (([DAW Sheet Data File].Sequence)=[Forms]![Menu]![StatusRegFilter].[Form]![DAWSheetStatus]![Sequence]));
These are form references in the criteria.
sorry Sir, it was a misunderstanding from my sideI ask you ?
the query seems to works fineActually, I'm not sure that query makes sense, there is no comparison field for the second form criteria.
Sorry I misread the query first time around.the query seems to works fine
View attachment 88180
the form remains open all the time so it is availableSorry I misread the query first time around.
In your code can you debug.print [Forms]![Menu]![StatusRegFilter].[Form]![DAWSheetStatus]![Registration] to make sure that subform is available to get the value from?
If Not IsNull(rs!emailCSM) Or Not IsNull(rs!emailCSA) Then
vRecipientList = vRecipientList & rs!emailCSM & rs!emailCSA & ";"