(Starter):
Sub Application_Error (Error As Exception, StackTrace As String) As Boolean
(...)
email.Body = logs
StartActivity(msgerro)
StartActivity(email.GetIntent)
Return True
End Sub
(Activity MyErrorDialog):
Sub Activity_Create(FirstTime As Boolean)
'Do not forget to load the layout file created with the visual designer. For example:
'Activity.LoadLayout("Layout1")
Dim Answ As Int
Dim id As InputDialog
Answ = id.Show("Please, send an e-mail to our support.", "Program crashed", "Send", "Cancel", "", Null)
If Answ = DialogResponse.POSITIVE Then
'?? How to start the intent to send email in "application_error" only if DialogResponse = Positive ??
End If
End Sub