|
|
|
| В VBA Access стоит задача отправить много разных отпечатков разных отчетов по почте с помощью команды DoCmd.SendObject:
DoCmd.SendObject _
ObjectType:=acSendReport, _
ObjectName:=stDocName, _
To:=StrAdress, _
OutputFormat:=acFormatSNP, _
Subject:=StrName, _
EditMessage:=False
При выполнении этой команды пишет: "Выбранный для вывода текущего объекта формат недоступен."
То же самое ое пишет для всех форматов, кроме HTML, TXT, RTF. Но при этих трех форматах теряется существенная визуальная часть отчета.
Интересно вот что: если строчку "OutputFormat..." удалить, то при выполнении команды предлагается выбрать формат из выпадающегося окошка и тогда при выборе любого формата (в т. ч. SNP) всё отлично отправляется в лучшем виде. Но каждый раз выбирать нужный формат очень накладно для пользователя (отчетов много). Также отлично отправляются SNP c помощью макроса "Отправить объект", но вариант плох, так как количество и состав отчетов определяются программным путём.
Пожалуйста, помогите решить эту проблему чайнику!!! | |
|
| |
|
|
|
| странно, вот такой код отлично отработал:
DoCmd.SendObject acSendTable, "Таблица1", acFormatXLS, "osmor@mail.ru", , , "Типа заголовок", , False
MSA 2003, Windows XP SP2, Lotus Notes 7.0.2 | |
|
| |
|
|
|
| и еще вот это посмотрите
http://hiprog.com/index.php?option=com_content&task=blogcategory&id=109&Itemid=149 | |
|
| |
|
|
|
| "Заменить в строке вызова константу acFormatSNP на "Снимок (*.snp)"
т.е DoCmd.SendObject acSendReport, "rptОтчетОГенерации&", "Снимок (*.snp)", strКому, , , strТема, varТекст, False"
Спасибо большое за ссылку! Помогло!!! | |
|
| |