Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Цикл VBA / 6 сообщений из 6, страница 1 из 1
14.12.2011, 17:24
    #37575964
Dudel
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл VBA
Здорофте!
Ситуация следующая: в неком каталоге храняться файлы.Путь к этому каталогу лежит в переменной. Необходимо эти файлы отправить по Outlook. Каждый файл необходимо отправить в новом письме соответствующему адресанту. Список адресов лежит в табличке Access. Напротив адреса в колонке стоит имя файла из каталога.
Подкиньте идею, как в цикле создавать письма и отправлять каждый файл на нужный адрес.
...
Рейтинг: 0 / 0
14.12.2011, 17:51
    #37576033
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл VBA
Да собсно открыть таблицу как рекордсет и перебрать все записи. Берёшь адрес из поля адреса, создаёшь письмо, аттачишь к нему файл с именем из поля имени, сохраняешь письмо, переходишь к следующей записи... а с отправкой MAPI и без тебя разберётся.
...
Рейтинг: 0 / 0
14.12.2011, 17:57
    #37576053
Dudel
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл VBA
Akina, а мож. набросок кода, пж?)
...
Рейтинг: 0 / 0
14.12.2011, 22:27
    #37576486
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл VBA
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
set rs = db.openrecordset("datatable")
with rs
  .movefirst
  do until .eof
    call send_message(!address, !attach)
    .movenext
  loop
  .close
end with
set rs = nothing
...
Рейтинг: 0 / 0
15.12.2011, 15:24
    #37577840
Dudel
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл VBA
А (!address, !attach) это типо поля из таблицы с адресом и именем файла?
...
Рейтинг: 0 / 0
15.12.2011, 16:01
    #37577952
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Цикл VBA
Не "типо", а именно они.
Само собой процедуру создания и отправки письма send_message тоже придётся написать...
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Цикл VBA / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]