Thanks, I had actually tried your correct syntax earlier but since it didn´t work, beacause of an other, then unknown error, I changed it to every possible format I could think of.
Knowing the correct syntax thanks to you, for certain, helped me move on and find the real, but extremely tiny, culprit - The space after the semi-colon. It had to be removed. It has to be like this:
SendString = SendString & !EmailFieldName & ";"
Now it works like a charm. Thanks again!
Complete working code for creating a new, empty mail in your default mapi emailer with a list of correctly formated emailadresses, from your contact table or query, in the "To" -field reads as follows:
Option Compare Database
Public SendString As String
Dim rstYourContactTableOrQuery As New ADODB.Recordset
'Open the Recordset to Customers
rstYourContactTableOrQuery.ActiveConnection = Application.CurrentProject.Connection
rstYourContactTableOrQuery.CursorType = adOpenKeyset
rstYourContactTableOrQuery.Open "YourContactTableOrQuery "
SendString = ""
If MsgBox("Send Email to all Contacts" & Chr(13) & _
"using Deafault Mapi Mailer?", 4) = 6 Then