使用vb.net在microsoft crm中将本地pdf附件添加到电子邮件

我正在创建电子邮件实体记录，并尝试下载pdf并使用organizationService将其附加到电子邮件

//与crm建立联系的机构设备

Dim service As IOrganizationService = Crm_GetOrganizationService()
Dim xrmContext As New CrmServiceContext(service)
Dim filepath = C:\Development\OpenWorks\owreports\PayAdviceAttachments

//webclient下载文件并存储在本地

Dim webclient As System.Net.WebClient = New System.Net.WebClient
webclient.UseDefaultCredentials = True
webclient.Credentials = New System.Net.NetworkCredential(My.Settings.WebClientUserName, My.Settings.WebClientPassword)
webclient.DownloadFile(uri, filePath)

//创建电子邮件

Dim email As New Email
email.RegardingObjectId = New EntityReference("account", x)
email.MimeType = "pdf"
email.Subject = "test"
email.To = New ActivityParty() {toParty}
**_emailId** = service.Create(email)

要附加附件，我不确定如何从本地服务器附加文件 下面是我尝试过的代码，但它不起作用

Dim attachList As List(Of ActivityMimeAttachment) = New List(Of ActivityMimeAttachment)
Dim attach As New ActivityMimeAttachment
attach.ObjectId = New EntityReference(email.EntityLogicalName, **_emailId**)
attach.ObjectTypeCode = email.EntityLogicalName
attach.FileName = filePath
attach.FileName = "test"
service.Create(attach)

---

有关于如何附加下载的pdf的帮助吗？

这是否回答了您的问题？你在网上找不到很多vb.net示例代码，请参考c#的链接SO线程equivalent@ArunVinoth是的，它看起来像是在工作，因为我看到了与那封电子邮件相同的文件大小。但该文件不是从该电子邮件打开的，它表示无法打开其格式的bcz文件。我在电子邮件和ActivityTimeAttachment中都以“pdf”的形式提供了mimetype。我遗漏了什么吗？