German Serienemails senden

Ich möchte gerne aus einem Datenbankprogramm heraus mehrere Emails in Serie versenden. Leider habe ich bisher nur die Möglichkeit gefunden einzelne Emails zu erstellen und diese anschließend an den Email-Client zu übergeben. Ich muss immer wieder auf Übergeben und dann Absenden tippen, was sehr lästig und unpraktisch ist.
In einer Schleife startet bei mir der Email-Client nur ein einziges Mal. Eine For-next-Schleife scheint nicht zu funktionieren.
Folgendes Beispiel:

Dim Message As Email
For i = 1 To Anzahl
Message.To.Add(“meine@Adresse.de”)
message.Subject = "Betreff”
message.Body = "Emailtext”
StartActivity(Message.GetIntent)
Next

Hier wird bei mehreren Durchläufen der Befehl StartActivity(Message.GetIntent) nur einmal ausgeführt.

Gibt es eine andere Möglichkeit Emails zu versenden!
:sign0163:
Danke für jede Hilfe

Werner

Falls sich der Inhalt nicht ändert, kannst du ja mehrere Emailempfänger in einer Email angeben und musst so nur einmal senden.

Ansonsten:
Basic4android Search: email message