iOS Question [B4X] [B4XPages] B4i how to send mail

[imbault]

Hi everyone,

Using this code

Private Sub SendMail
   'always dim and initialize the MailComposer before you use it
   Dim mailc As MailComposer
   mailc.Initialize("mailc")
   mailc.SetToRecipients(Array("[email protected]", "[email protected]"))
   mailc.SetSubject("This is the subject")
   mailc.SetBody("This is the <b>body</b>.", True)
   'create a file and add it as an attachment
   File.WriteString(File.DirTemp, "1.txt", "hello world")
   mailc.AddAttachment(File.DirTemp, "1.txt", "text/plain")
'''''''''''''
  'WHAT to put instead of Page1, B4XPages.MainPage.root ?
''''''''''''''''''
    mailc.Show(B4XPages.MainPage.Root)

End Sub

Sub Mailc_Complete (Result As Int)
End Sub

Many Thanks

Patrick

 

[imbault]

Sorry, Found it

B4XPages.GetNativeParent(B4XPages.GetPage("Page 2"))

 

[RauchG]

Sorry, Found it

B4XPages.GetNativeParent(B4XPages.GetPage("Page 2"))

Hello imbault,
it doesn't work for me. Do you have a little example?

 

[RauchG]

Hello imbault,
it doesn't work for me. Do you have a little example?

it's OK...run for Me

mailc.Show(B4XPages.GetNativeParent(B4XPages.GetPage("mainpage")))