Opening email command not working...

L

lorebarita

Member
Licensed User
Longtime User
Hi,

I would like to open the email via mia application with the command like:
Dim MyIntent As Intent
MyIntent.Initialize(MyIntent.ACTION_MAIN,"")
MyIntent.SetComponent("com.android.email")
MyIntent.AddCategory("android.intent.category.LAUNCHER")

If MyIntent.IsInitialized Then
StartActivity(MyIntent)
End If

Unfortunately it is opening a window where I then have to select the application I want to open with. See image.
I would like the application to open automatically.
Thanks
Lorenzo
 

Attachments

  • Screen2.png
    92 KB · Views: 327
Sort by date Sort by votes

margret

Well-Known Member
Licensed User
Longtime User
You can try this:

B4X: 
Sub SendMail(SendTo As String, SendBody As String, SendSub As String, SendAtt As String)
   Dim ei As Email
   SendTo = SendTo.Trim
   ei.To.Add(SendTo)
   ei.Body = SendBody
   ei.Subject = SendSub.Trim
   If SendAtt <> "" Then 
      ei.Attachments.Add(SendAtt)
   End If
   Try
      StartActivity(ei.GetIntent)
   Catch
      Msgbox("Email Client Could Not Be Accessed, Please Make Sure You Have Setup Your Email Client", "NOTICE")
   End Try
End Sub
 
Upvote 0
You must log in or register to reply here.

Similar Threads

  • Question
Android Question Firebase Auth - emailVerified
Replies
3
Views
3K
Alexander Stolte
  • Article
B4A Library [B4X] Supabase - The Open Source Firebase alternative
2 3 4
Replies
63
Views
43K
Alexander Stolte
Wish Update OpenJDK
2
Replies
34
Views
14K
Sagenut
  • Question
Android Question How to enter a curl command as an HTTPS request
2
Replies
21
Views
18K
Colin Evans
  • Locked
  • Article
B4J Library [B4X] jRDC2 - B4J implementation of RDC (Remote Database Connector)
5 6 7
Replies
138
Views
184K
Erel
Menu
Log in
Register
Cookies are required to use this site. You must accept them to continue using the site. Learn more…