我目前正在开发一个可以从 PST 文件中提取项目并将其保存到指定位置的应用程序。现在我正在使用提供的 Microsoft.Office.Outlook.Interop 来执行此操作。
这是我用来保存联系人项目的一些代码。我使用的所有项目的代码都是相似的。
Dim objitem As Object
If TypeOf objItem Is Outlook.ContactItem Then
'Get out contacts
ContactItem = CType(objItem, Outlook.ContactItem)
strSaveName = (ContactItem.FullName.ToString) & ".vcf"
ContactItem.SaveAs(strFolderPath & "\" & (strSaveName), Outlook.OlSaveAsType.olVCard)
End If
但是,当我尝试使用 SaveAs() 方法保存项目时,会弹出安全提示,要求我允许应用程序在一段时间内使用 Outlook。(1,5,10 分钟)如果我没记错的话。我了解 Outlook 兑换可以绕过这一点。我该怎么做?
问候,
阿迪布