Android Question Send Many Email

[nickysuwandi]

based on this example
https://www.b4x.com/android/forum/threads/new-net-library-android-ftp-smtp-and-pop3.10892/#content

i had success create send email modul.

But I have problem when i want to send to 300 email with same message. There any tutor how to send many email in same time and how to insert the people name based on email we send to the email message.

Thanks

 

[Erel]

Which problem? Make sure to use an email server that doesn't restricts the number of recipients.

 

[nickysuwandi]

Which problem? Make sure to use an email server that doesn't restricts the number of recipients.

how to know that mail has been success or fail so i can send another mail.

This my code

If lvTo.Size>0 Then
                For i=0 To lvTo.Size-1
                    Dim splt() As String  = Regex.Split("\|",lvTo.GetItem(i))
                    ProgressDialogShow2("Please wait . . .Send email to " & splt(0) & "/" & splt(2) ,  True)
                    SMTP1.to.Add(splt(2))
                    SMTP1.bcc.Add(edtFrom.Text)
                    SMTP1.Subject = edtJudul.Text.Replace("[block]", splt(1) & "(" & splt(0) & ")")
                    If edtAt.Text<>"" Then
                        If File.Exists(strfolder,strfile) Then
                            SMTP1.AddAttachment(strfolder,strfile )
                        End If
                    End If
                    SMTP1.Body = edtPesan.Text.Replace("[block]", splt(1) & "(" & splt(0) & ")")
                    SMTP1.Send
                Next
            End If

 

[MarkusR]

found in docu
https://www.b4x.com/android/help/net.html#smtp_send

The MessageSent event will be raised after the message was sent.

MessageSent(Success As Boolean)

because the event did not have a message id i would use
"Wait for" in the send loop.

 

[nickysuwandi]

found in docu
https://www.b4x.com/android/help/net.html#smtp_send


because the event did not have a message id i would use
"Wait for" in the send loop.

MarkusR, how we know that last email has finish sent, if i send 300 message, so i can warning the user no to close the apps.

Thanks

 

[nickysuwandi]

MarkusR, how we know that last email has finish sent, if i send 300 message, so i can warning the user no to close the apps.

Thanks

This method help me solve my problem, maybe your guys had best way than this, please share, Thanks.

Sub SMTP_MessageSent(Success As Boolean)
    IntMailSendCount=IntMailSendCount+1
    ProgressDialogShow2("Please wait . . .Sending Email " & IntMailSendCount & "/" & IntTotMail ,  False)
    If IntMailSendCount = IntTotMail Then
       ProgressDialogHide
       ToastMessageShow("All Email Sended",False)
    End If
End Sub

 

[MarkusR]

if u use "Wait for Event" direct after send u have a better control.

 

[nickysuwandi]

if u use "Wait for Event" direct after send u have a better control.

Thanks Markus for your advice, can you give me example..

i had try this code , when my mail send all out,still waiting appear.

wait for (IntMailSendCount = IntTotMail)  IntMailSendCount = IntTotMail

 

[MarkusR]

see this tutorial
https://www.b4x.com/android/forum/threads/b4x-resumable-subs-sleep-wait-for.78601/

it should something like

SMTP1.Send
Wait For SMTP1_MessageSent(Success As Boolean)
If Success Then
Else
End If

"SMTP1" is the name u used at initialize

Its a bit slower because u send the mail one by one but u know which one was not send out.

 

[nickysuwandi]

see this tutorial
https://www.b4x.com/android/forum/threads/b4x-resumable-subs-sleep-wait-for.78601/

it should something like

SMTP1.Send
Wait For SMTP1_MessageSent(Success As Boolean)
If Success Then
Else
End If

"SMTP1" is the name u used at initialize

Its a bit slower because u send the mail one by one but u know which one was not send out.

Thanks MarkusR