Android Question send mail with attachment

Zeev Goldstein · Sep 8, 2024

hi

after lots of digging i finally got this sub to work perfectly
this is the only way i found that opens the email apps only and not all sharing apps (in some cases it adds paypal as an email app but generally it is perfect)

the only issue i have now is is it possible to add an attachment this sub?
how?
i tried with provider and made sure the file was copied and exist in shared dir but no attachment was added to the mail
does this method allows to add attachment?

thanks

B4X:

Sub SendMail(SendTO As String, SendCC As String, SendBCC As String, Subject As String, Body As String)
    Dim in As Intent
    
    Try
    
        in.Initialize("android.intent.action.SENDTO", "mailto:")
        
        in.PutExtra("android.intent.extra.EMAIL", Array As String(SendTO))
        in.PutExtra("android.intent.extra.CC", Array As String(SendCC))
        in.PutExtra("android.intent.extra.BCC", Array As String(SendBCC))
    
        in.PutExtra("android.intent.extra.SUBJECT", Subject)
    
        in.PutExtra("android.intent.extra.TEXT", Body)
    
        StartActivity(in)
    
    Catch
        
        Log (LastException.Message)
        
    End Try
    
End Sub

zed · Sep 8, 2024

Using an Email object you can create an intent that holds a complete email message.
You can then launch the email application by calling StartActivity. Note that the email will not be sent automatically. The user will need to press on the send button.
Example:

B4A:

Dim Message As Email
Message.To.Add("[email protected]")
Message.Attachments.Add(File.Combine(File.DirRootExternal, "SomeFile.txt"))
StartActivity(Message.GetIntent)

look at this

B4A - Phone

Zeev Goldstein · Sep 8, 2024

Thanks
Tried this way, it opens all sharing apps on the start not only email apps and that's the bigest problem as when the user presses always all sharing will go through email app he chose - very bad

zed · Sep 8, 2024

Maybe this

Email intent + attachment: email clients only are required

HI, All Is it possible ? Email object of Phone lib offers all text-messaging apps - it's wrong, the attachment is required by email only.

www-b4x-com.translate.goog

agraham · Sep 8, 2024

Using Android Intent.ACTION_SEND for sending email

I'm using Intent.ACTION_SEND to send an email. However, when I call the intent it is showing choices to send a message, send an email, and also to send via bluetooth. I want it to only show choices...

stackoverflow.com

Zeev Goldstein · Sep 8, 2024

zed said:
Maybe this

Email intent + attachment: email clients only are required

HI, All Is it possible ? Email object of Phone lib offers all text-messaging apps - it's wrong, the attachment is required by email only.

www-b4x-com.translate.goog

sorry - didn't work
has no attachment option and my original code works much better

Zeev Goldstein · Sep 8, 2024

agraham said:
Using Android Intent.ACTION_SEND for sending email

I'm using Intent.ACTION_SEND to send an email. However, when I call the intent it is showing choices to send a message, send an email, and also to send via bluetooth. I want it to only show choices...

stackoverflow.com

thanks
i tried to figure out what's going on there and got even more lost
my code (in the first post) works file - opens only email apps as i want
but the only issue i now have is how to add attachment to it
is there anything you can help with?

agraham · Sep 9, 2024

Sorry but I can't get it to work either as I am too rusty and have forgotten, or never learned, the ins and outs of the latest Android version permissions and security limitations.

Zeev Goldstein · Sep 9, 2024

agraham said:
Sorry but I can't get it to work either as I am too rusty and have forgotten, or never learned, the ins and outs of the latest Android version permissions and security limitations.

i can't believe that...

DonManfred · Sep 9, 2024

[class] FileProvider - share files

Edit: FileProvider is included as an internal library now. After investigating several issues with the current FileProvider code that you can find in the forum, I decided to make some improvements and implement it in a class. Starting from Android 7 (API 24) you cannot directly share file uris...

www.b4x.com

The FileProvider Example shows how to send an Email with Intent with Attachments.

It does work for me on an Android 13 Device without any problem.

The code from Example:

B4X:

Private Sub btnSendEmail_Click
    Dim FileName As String = "b4a.png"
    'copy the shared file to the shared folder
    File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName)
    Dim email As Email
    email.To.Add("[email protected]")
    email.Subject = "subject"
    email.Attachments.Add(Provider.GetFileUri(FileName))
    email.Attachments.Add(Provider.GetFileUri(FileName)) 'second attachment
    Dim in As Intent = email.GetIntent
    in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION
    StartActivity(in)
End Sub

Zeev Goldstein · Sep 9, 2024

DonManfred said:
[class] FileProvider - share files

Edit: FileProvider is included as an internal library now. After investigating several issues with the current FileProvider code that you can find in the forum, I decided to make some improvements and implement it in a class. Starting from Android 7 (API 24) you cannot directly share file uris...

www.b4x.com

The FileProvider Example shows how to send an Email with Intent with Attachments.

It does work for me on an Android 13 Device without any problem.

The code from Example:

B4X:

Private Sub btnSendEmail_Click Dim FileName As String = "b4a.png" 'copy the shared file to the shared folder File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName) Dim email As Email email.To.Add("[email protected]") email.Subject = "subject" email.Attachments.Add(Provider.GetFileUri(FileName)) email.Attachments.Add(Provider.GetFileUri(FileName)) 'second attachment Dim in As Intent = email.GetIntent in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION StartActivity(in) End Sub

Yes it does
But then the intent opens all sharing apps not just email apps
Then the user clicks on [always] ans all his sharing goes to that email app and i got an angry client...

So is there a way to force that example to open the picker with only email apps?

The sample i use does that...

teddybear · Sep 9, 2024

Zeev Goldstein said:
but the only issue i now have is how to add attachment to it
is there anything you can help with?

You can't use android.intent.action.SENDTO to add attachment. ACTION_SENDTO is for no attachment,See doc

Action
ACTION_SENDTO (for no attachment) or
ACTION_SEND (for one attachment) or
ACTION_SEND_MULTIPLE (for multiple attachments)

DonManfred · Sep 9, 2024

Zeev Goldstein said:
Then the user clicks on [always] ans all his sharing goes to that email app and i got an angry client...

B4X:

Private Sub btnSendEmail_Click
    Dim FileName As String = "b4a.png"
    'copy the shared file to the shared folder
    File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName)
    Dim email As Email
    email.To.Add("[email protected]")
    email.Subject = "subject"
    email.Attachments.Add(Provider.GetFileUri(FileName))
    email.Attachments.Add(Provider.GetFileUri(FileName)) 'second attachment
    Dim in As Intent = email.GetIntent
    in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION
    in.WrapAsIntentChooser("'Send email")
    StartActivity(in)
End Sub

will show the chooser every time.

PD: You should tell your users to select an emailapp

agraham · Sep 9, 2024

You can reduce the number of apps the user has to chose from by specifying a more limited MIME type with SetType

B4X:

Private Sub btnSendEmail_Click
    Dim Provider As FileProvider
    Provider.Initialize
    Dim FileName As String = "b4a.png"
    Dim FileName2 As String = "b4a2.png"
    'copy the shared file to the shared folder
    File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName)
    File.Copy(File.DirAssets, FileName2, Provider.SharedFolder, FileName2)
    Dim email As Email
    email.To.Add("[email protected]")
    email.Subject = "subject"
    email.Attachments.Add(Provider.GetFileUri(FileName))
    email.Attachments.Add(Provider.GetFileUri(FileName2)) 'second attachment
    Dim in As Intent = email.GetIntent
    in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION
    in.SetType("message/rfc822") ' ADD THIS LINE TO SET A MORE LIMITED MIME TYPE
    StartActivity(in)
End Sub

Zeev Goldstein · Sep 9, 2024

agraham said:

You can reduce the number of apps the user has to chose from by specifying a more limited MIME type with SetType

B4X:

Private Sub btnSendEmail_Click
    Dim Provider As FileProvider
    Provider.Initialize
    Dim FileName As String = "b4a.png"
    Dim FileName2 As String = "b4a2.png"
    'copy the shared file to the shared folder
    File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName)
    File.Copy(File.DirAssets, FileName2, Provider.SharedFolder, FileName2)
    Dim email As Email
    email.To.Add("[email protected]")
    email.Subject = "subject"
    email.Attachments.Add(Provider.GetFileUri(FileName))
    email.Attachments.Add(Provider.GetFileUri(FileName2)) 'second attachment
    Dim in As Intent = email.GetIntent
    in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION
    in.SetType("message/rfc822") ' ADD THIS LINE TO SET A MORE LIMITED MIME TYPE
    StartActivity(in)
End Sub

this opens ALL sharing apps so unfortunately it is not good
all the rest is perfect but i can't have the client press [always] on his mail app and then everything he wants to share will go through this mail app

DonManfred said:

B4X:

Private Sub btnSendEmail_Click
    Dim FileName As String = "b4a.png"
    'copy the shared file to the shared folder
    File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName)
    Dim email As Email
    email.To.Add("[email protected]")
    email.Subject = "subject"
    email.Attachments.Add(Provider.GetFileUri(FileName))
    email.Attachments.Add(Provider.GetFileUri(FileName)) 'second attachment
    Dim in As Intent = email.GetIntent
    in.Flags = 1 'FLAG_GRANT_READ_URI_PERMISSION
    in.WrapAsIntentChooser("'Send email")
    StartActivity(in)
End Sub

will show the chooser every time.

PD: You should tell your users to select an emailapp

ok

this one does open the picker every time but it shows other app as well as mail apps so the user can choose whatsapp instead - and it sends the file
so it's nice
i will play with it - perhaps the solution is just tell him to choose a mail app
but it works

Zeev Goldstein · Sep 9, 2024

teddybear said:
You can't use android.intent.action.SENDTO to add attachment. ACTION_SENDTO is for no attachment,See doc

tried your advice
here's what i have
it doesn't work - no attachment is added to the mail - what did i do wrong?

B4X:

Private Sub Button6_Click
    Dim in As Intent
    
    Try
    
        'in.Initialize("android.intent.action.SENDTO", "mailto:")
        in.Initialize("android.intent.action.SEND", "mailto:")
        
        in.PutExtra("android.intent.extra.EMAIL", Array As String("[email protected]"))
    
        in.PutExtra("android.intent.extra.SUBJECT", "Subject")
    
        in.PutExtra("android.intent.extra.TEXT", "Body")
    
        Dim FileName As String = "b4a.png"

        If File.Exists(File.DirAssets,FileName) Then

            File.Copy(File.DirAssets, FileName, Provider.SharedFolder, FileName)
    
            in.PutExtra("Android.intent.EXTRA_STREAM", Provider.GetFileUri(FileName))
        
        End If
    
        StartActivity(in)
        
    Catch
        
        Log (LastException.Message)
        
    End Try
    
End Sub

Android Question send mail with attachment

Zeev Goldstein

Well-Known Member

zed

Active Member

Zeev Goldstein

Well-Known Member

zed

Active Member

Email intent + attachment: email clients only are required

agraham

Expert

Using Android Intent.ACTION_SEND for sending email

Zeev Goldstein

Well-Known Member

Email intent + attachment: email clients only are required

Zeev Goldstein

Well-Known Member

Using Android Intent.ACTION_SEND for sending email

agraham

Expert

Zeev Goldstein

Well-Known Member

DonManfred

Expert

[class] FileProvider - share files

Zeev Goldstein

Well-Known Member

[class] FileProvider - share files

teddybear

Well-Known Member

DonManfred

Expert

agraham

Expert

Zeev Goldstein

Well-Known Member

Zeev Goldstein

Well-Known Member

Similar Threads