Использование MAPI в Microsoft Visual Basic
Элементы управления MAPI позволяют создавать приложения Visual Basic, снабженные средствами для работы с сообщениями. Таких управляющих элементов два:
- MAPISession;
- MAPIMessages.
Элемент управления MAPISession позволяет зарегистрироваться в коммуникационной системе и создать сеанс MAPI. Он же используется для завершения сеанса MAPI.
Элемент управления MAPIMessages реализует различные функции системы сообщений в течение сеанса, созданного элементом управления MAPISession.
Пример Этот код на Visual Basic открывает сообщение электронной почты средствами элементов управления MAPISession и MAPIMessages:
Private Sub GetlastMessage_Click()
Dim strHeader As String
'Регистрация, открытие почтового сеанса и загрузка почты.
MAPISession1.Action = mapSignOn
MAPIMessagesI.SessionID = MAPISessionI.SessionID
MAPIMessages1.Fetch
'Последнее сообщение в почтовом ящике Inbox.
MAPIMessagesI.Msglndex = MAPIMessagesI.MsgCount - 1
strHeader = "От кого: " & MAPIMessagesI .MsgOrigDisplayName
strHeader = strHeader & " Тема: " &
MAPIMessagesI.MsgSubject
'Вывод текста сообщения в окно сообщений и
'завершение сеанса.
MsgBox MAPIMessagesI.MsgNoteText, , strHeader
MAPISessionI.Action = mapSignOff
End Sub
Примечание Более подробную информацию о MAPI Вы найдете на Web-узле Microsoft по адресу www.microsoft.com/win32dev/mapi/.
