powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Цикл VBA
6 сообщений из 6, страница 1 из 1
Цикл VBA
    #37575964
Dudel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здорофте!
Ситуация следующая: в неком каталоге храняться файлы.Путь к этому каталогу лежит в переменной. Необходимо эти файлы отправить по Outlook. Каждый файл необходимо отправить в новом письме соответствующему адресанту. Список адресов лежит в табличке Access. Напротив адреса в колонке стоит имя файла из каталога.
Подкиньте идею, как в цикле создавать письма и отправлять каждый файл на нужный адрес.
...
Рейтинг: 0 / 0
Цикл VBA
    #37576033
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да собсно открыть таблицу как рекордсет и перебрать все записи. Берёшь адрес из поля адреса, создаёшь письмо, аттачишь к нему файл с именем из поля имени, сохраняешь письмо, переходишь к следующей записи... а с отправкой MAPI и без тебя разберётся.
...
Рейтинг: 0 / 0
Цикл VBA
    #37576053
Dudel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Akina, а мож. набросок кода, пж?)
...
Рейтинг: 0 / 0
Цикл VBA
    #37576486
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: 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
Цикл VBA
    #37577840
Dudel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А (!address, !attach) это типо поля из таблицы с адресом и именем файла?
...
Рейтинг: 0 / 0
Цикл VBA
    #37577952
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не "типо", а именно они.
Само собой процедуру создания и отправки письма send_message тоже придётся написать...
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Цикл VBA
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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