| Вопрос: Из Access в Outlook. Передача email Помогите плиз. | Добавлено: 16.04.05 22:43 |
Автор вопроса:  VopVamP
|
|
Помогите пожалуйста, я пишу макрос для базы данных с возможностью отправлять отфильтрованные по какому-либо признаку записи (т.е. их адреса email) из Access в Outlook.
Но проблема в том, что передается только один адрес (который просматриваю). Подскажите плиз, как в поле outlook "Кому" передать все адреса email, которые я отфильтровал?... При нажатии на кнопку "отправить": Private Sub cmdEmail_Click() Call SendEmail(Me.Email) End Sub Далее параметр Me.Email - текущий адрес, передается в модуль: Public Sub SendEmail(varTo As Variant) Dim mli As Outlook.MailItem InitOutlook Set mli = ola.CreateItem(olMailItem) mli.To = varTo & "" mli.Display Set mli = Nothing CleanUp End Sub |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  Дмитрий Вопросов: 1 Ответов: 3 |
Профиль | | #1 | Добавлено: 20.05.05 08:58 |
|
Можно передавать в SendEmail массив из адресов.
А в SendEmail организовать цикл перебора массива и для каждого элемента массива выполнять команду mli.Recipients.Add(AddressArray(i)) |
||
Страница: 1 |