VBNet - Форум - экспорт писем из The bat в excel с помошью MAPI

Вопрос: экспорт писем из The bat в excel с помошью MAPI Добавлено: 20.06.05 10:07

Автор вопроса: maks555

имеется следующая програмка:

Dim i As Long
Dim telo

MAPISession1.DownLoadMail = True
MAPISession1.SignOn

MAPIMessages1.SessionID = MAPISession1.SessionID
MAPIMessages1.Fetch

If MAPIMessages1.MsgCount > 0 Then
   For i = 0 To MAPIMessages1.MsgCount - 1
   MAPIMessages1.MsgIndex = i
   Worksheets("лист1").Cells(i + 1, 1).Value = MAPIMessages1.MsgOrigAddress
   Worksheets("лист1").Cells(i + 1, 2).Value = MAPIMessages1.MsgSubject

   Next
End If
MAPISession1.SignOff

как вы уже поняли програмка экспортирует письма из The bat в exсel. Имеются следующие вопросы:

Экспорт происходит очень долго. 100 писем где то минут за 15 это при том, что экспортируется только тема, дата и e-mail. Как можно ускорить это процедуру? что не так?

При экспорте тела письма вылазит ошибка out of memory. Как это лечится?

не удалось найти функцию которая бы показывала дату создания письма,а не дату получения.

как сделать чтобы экспортировались только непрочитанные письма.

Возможна ли работа с другими папками например sent или trash.
Ответить

Ответы Всего ответов: 2

Номер ответа: 1 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #1	Добавлено: 20.06.05 13:22
	"Worksheets("лист1".Cells(i + 1, 1).Value =" а Worksheets это чё? контрол? или чё? или может он тормознутый ? Ответить

Номер ответа: 2 Автор ответа: maks555 Вопросов: 6 Ответов: 4	Профиль \| \| #2	Добавлено: 20.06.05 13:27
	всмысле че? так то это рабочий лист в excel Ответить

Страница: 1 |