Здравствуйте.
У меня такая проблема.
Делаю кнопку при нажатии которой появляется окно Outlook и записывается кому, кто тема и должен быть приаттачен файл. Но когда я аттачу файл Outlook выдаёт сообщение, что «Программа пытается получить доступ к адресам электронной почты, хранящейся в Outlook. Разрешить это действие?» (в англ. Версии что-то типа: «program is trying to access e-mail addresses you have stored in outlook »)и это мешает нормальной работе. Вопрос можно как-то обойти окно? Меня интересует только возможность добавления файла, пользователь сам письмо отправляет. Вот мой код:

Dim oMsg As Outlook._MailItem
Dim olApp As New Outlook.Application

oMsg = olApp.CreateItem(Outlook.OlItemType.olMailItem)
oMsg.Display()
oMsg.Subject = "Посылка вложения "
oMsg.Body = "Привет" & vbCr & vbCr

oMsg.To = " mail@mail.com "

Dim sSource As String = "C:\test.xml"
Dim sDisplayName As String = "test.xml"

Dim sBodyLen As String = oMsg.Body.Length
Dim oAttachs As Outlook.Attachments = oMsg.Attachments
Dim oAttach As Outlook.Attachment

oAttach = oAttachs.Add(sSource, , sBodyLen + 1, sDisplayName)

'oMsg.Send()

olApp = Nothing
oMsg = Nothing
oAttach = Nothing
oAttachs = Nothing

У меня это уже есть выше, не помогает

Спасибо. Начальство сказало пока сойдёт, а потом думаю придётся своё что-то писать