' Dim Message As Email
' Message.Subject = "PDF Invoice"
' Message.Body = "Dear customer, the below attachement contains your invoice in pdf format.Please contact us for more details."
' Message.To.Add(txtEmail.Text.Trim)
' Message.Attachments.Add(File.Combine(File.DirRootExternal, FileName))
' StartActivity(Message.GetIntent)