UWP üzerinden e-posta ekleri gönderme E-postaManager çalışmıyor

Question

Aşağıdaki kodla birlikte evrensel bir uygulamadan bir ek göndermek çalışmıyor, neden?

 Dim emailMessage As New EmailMessage() 
     emailMessage.[To].Add(New EmailRecipient("a@b.com")) 
     emailMessage.Subject = "Test" 
     emailMessage.Body = "Hello World" 

     Dim localAppFolder = Windows.Storage.ApplicationData.Current.LocalFolder 
     Dim file = Await localAppFolder.CreateFileAsync("SomeFile.txt", Windows.Storage.CreationCollisionOption.ReplaceExisting) 
     Await Windows.Storage.FileIO.WriteTextAsync(file, "aaaa") 
     Dim fileRef = RandomAccessStreamReference.CreateFromFile(file) 
     emailMessage.Attachments.Add(New EmailAttachment(file.Name, fileRef)) 
     Await EmailManager.ShowComposeNewEmailAsync(emailMessage) 

, konu ve gövde gösterisi Outlook'ta ince fakat ek eksik Kime: Outlook screenshot

Answer 1

Ben Outlook Masaüstü uygulaması olduğu için olduğuna inanıyoruz. Anladığım kadarıyla, EmailManager.ShowComposeNewEmailAsync posta istemcisi uygulamasını başlatmak için mailto: protocal'i kullanıyor ve e-posta içeriğini sağlamak için paylaşımı kullanıyor.

seçeneğini varsayılan uygulama iletişim başlattı, aşağıdaki şekilde eki görmek mümkün olacak ne zaman posta Store uygulamasını seçerseniz: önce mailto gelince varsayılan olarak Masaüstü Outlook uygulamasını seçtiyseniz

protokolünde, kontrol panelindeki mailto: protocol association için varsayılan uygulamayı değiştirmeniz gerekir.

Önceden, ShowComposeNewEmailAsync yalnızca windows telefon çalışma zamanı uygulaması için çalışır. Ve belgede güncel değil çünkü 10 desteğini içermiyor.

Windows 10 işletim sisteminde, sorunsuz bir şekilde çalışır. Ancak Windows Masaüstünde bir mağaza uygulaması seçmelisiniz.