Du kunne jo forsøge med en gang høkerprogrammering i stil med:
Function GruppeMail() Dim rst As Recordset Dim s As String Set rst = CurrentDb.OpenRecordset(\"Q_MailKunder\") s = \"\" With rst Do Until .EOF If .Fields(\"Medtages\") = True Then s = s & .Fields(\"Email\") & \";\" End If .MoveNext Loop .Close End With Set rst = Nothing s = Left(s, Len(s) - 1) \' Slet sidste \";\" DoCmd.SendObject , , acFormatTXT, \"mig_selv@min_site.dk\", , s, \"Indtast emnet her\", \"Indsæt selve teksten her (vedhæft evt. dokument)\", True End Function
Denne konstruktion sender en mail til dig selv med alle de øvrige adresser i cc-feltet.
Når du har din formular åben i design status, kan du lave en ganske almindelig knap hvor du kan vælge send som mail. Skriv direkte til mig på wa@wa.dk om du ikke forstår denne besked.
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.