Форум программистов, компьютерный форум, киберфорум
HCL Notes: Программирование
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.97/62: Рейтинг темы: голосов - 62, средняя оценка - 4.97
s106
1

Отправка Писем Из Ms Office

27.06.2012, 11:00. Просмотров 11833. Ответов 7
Метки нет (Все метки)

Помогите разобраться со следующей ситуацией.
Возникла необходимость организовать рассылку писем в Lotus Notes средствами MS Office (из Excel). Насколько я понял, делаться это должно примерно такой процедурой на VBA :

Set Session = CreateObject("Lotus.NotesSession")
Call Session.Initialize("пароль")
Set Maildb = Session.GETDATABASE("", "C:\Program Files\lotus\notes\data\bookmark.nsf")
If Not Maildb.IsOpen = True Then
Call Maildb.Open
End If
Set MailDoc = Maildb.CREATEDOCUMENT
Call MailDoc.ReplaceItemValue("Form", "Memo")
Call MailDoc.ReplaceItemValue("SendTo", "адрес")
Call MailDoc.ReplaceItemValue("CopyTo", "адрес")
Call MailDoc.ReplaceItemValue("BlindCopyTo", "адрес")
Set Body = MailDoc.CREATERICHTEXTITEM("Body")
Call Body.APPENDTEXT("текст письма")
Call Body.ADDNEWLINE(2)
Call Body.EMBEDOBJECT(1454, "", "файл вложения")
MailDoc.SAVEMESSAGEONSEND = True
Call MailDoc.ReplaceItemValue("PostedDate", Now())
Call MailDoc.SEND(True)
Set MailDoc = Nothyng
Set Body = Nothyng
Set Maildb = Nothyng
Set Session = Nothyng

Сколько смотрел, везде советуют делать примерно так, однако у меня почему-то возникают проблемы.
Письмо в общем-то отправляется, однако текст письма отсутствует. Объект "Body", который по дее должен его содержать, почему-то передает только вложенный файл, а текст письма - не передает.
Более того, среди отправленных писем в их объектной модели я не смог найти поля, отвечающего за текст письма. Поля "Body" там вообще не было, были только
Title Site URLIcon URL Form Collaborators SourceForm $UpdatedBy, и ни в одном из них текста не содержалось.
Версия Lotus Notes стоит 8.5. Может быть, в ней поменялось что-то в структуре писем?
Знает кто-нибудь, где в Lotus Notes 8.5 содержится текст письма? И есть ли где - нибудь описание документа Lotus Notes 8.5 с его полями и методами?
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.06.2012, 11:00
Ответы с готовыми решениями:

Office 365 - Exchange online пересылка писем
Добрый день! Задача стоит следующая. Есть 10 почтовых ящиков, которые иногда шлют почту на адрес...

Слияние писем в отдельные документы и присвоение названий (MS Office Word)
Здравствуйте. Подскажите, пожалуйста, можно ли осуществить слияние таким образом, чтобы каждое...

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

Отправка писем
class MailSender { private String username; private String password; private...

7
0 / 0 / 0
Регистрация: 23.08.2008
Сообщений: 6,252
27.06.2012, 13:27 2
И есть ли где - нибудь описание документа Lotus Notes 8.5 с его полями и методами?
странный вопрос :o
вам какое описание:
- на уровне СиАПИ - хелп по СиАПИ и поиск в тырнете (но это врядли вам нужно)
- на уровне объекта - хэлп дизигнера
письма - это обычные доки LDN
поле body - это RichText поле (такой тип), собсно в нём и содержится (обычно) текст письма
0
s106
27.06.2012, 13:51 3
Цитата Сообщение от lmike
странный вопрос :o
- на уровне объекта - хэлп дизигнера
Ну дело-то в том, что на моем компьютере, как и на прочих тут, дизигнера этого нету... Насколько понимаю, его надо отдельно устанавливать... И я даже не знаю, можно ли его так вот например скачать и поставить в дополнение к клиентской части?
Поэтому хэлп от него найти бы - уже хорошо. В сети видел что-то похожее от 5-й версии, 8.5 не находил...



Цитата Сообщение от lmike
письма - это обычные доки LDN
поле body - это RichText поле (такой тип), собсно в нём и содержится (обычно) текст письма
Собственно говоря, так везде и пишут, но почему-то найти его у меня не получается.
Получаю, например, документ (отправленное письмо):

Set Collection = Maildb.AllDocuments
Set docB = Collection.GetnthDocument(i)

Смотрю у него там поля (Items), они какие-то такие:

Title Site URLIcon URL Form Collaborators SourceForm $UpdatedBy

А Body среди них почему-то нету, и где там в них текст письма спрятан, тоже непонятно... Соответственно, когда создаю этот Body, как выше написал, то текст в нем все равно не передается, хотя вложенный файл передается. Не могу понять, в чем дело-то...
0 / 0 / 0
Регистрация: 17.10.2008
Сообщений: 506
27.06.2012, 14:07 4
Цитата Сообщение от s106
Поэтому хэлп от него найти бы - уже хорошо
http://publib.boulder.ibm.com/infocenter/d.../v8r0/index.jsp
0
s106
27.06.2012, 14:38 5
Спасибо большое за ссылку.

Вопросы же остаются...
Там, к примеру, написано:

1.This example prints the name of every item in a document. For example, if the document contains five items, the script might print "From," "SendTo," "Subject," "Body," and "DeliveredDate."

Замечательно, кабы оно так и у меня отображалось, однако вижу у себя другое (см.выше)

Може ли быть, что из редактора Excel VBA как-то все криво видно? Может, прописать там надо в references что-то? Или необходимо Designer установить?

Я Lotus этот неделю назад впервые увидел, поэтому могу какие-то вещи там примитивные не знать, прошу уж извинить... Раньше Outlookом пользовался, там все понятно было...
0 / 0 / 0
Регистрация: 04.12.2004
Сообщений: 3,329
27.06.2012, 15:50 6
Попробуй Call Body.Update() перед отправкой сделать.
0
0 / 0 / 0
Регистрация: 07.02.2010
Сообщений: 1,063
27.06.2012, 15:54 7
Call MailDoc.SEND(True)
Попробуйте с False. Или Вам форма в док-те принципиально необходима?
PS. Попробовал Ваш скрипт из VBS-файла - с send(False) и созданием письма не в bookmark.nsf, а в почтовой базе пользователя (правда, в варианте с False, полагаю, это непринципиально). Все работает нормуль - и текст, и файл на месте. И поля все тоже.
PPS. В bookmark.nsf нет формы Memo - так что пробуйте с False. :o
0
s106
27.06.2012, 17:10 8
Мыш, спасибо большое!

С False действительно все работает. В общем-то так и думал, что где-то что-то не то по незнанию поставил... Ну ладно, дальше, думаю, разберусь...
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.06.2012, 17:10

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

отправка писем
Как отправлять письма на почту?

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

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

Отправка писем
Здравствуйте может не по теме,ну извините У меня вот такая проблема При отправке писем на...

Отправка писем
Привет всем, есть скрипт обратной связи, при нажатии отправить появляется пустая страница, а...

Отправка писем
Есть простая форма: <!DOCTYPE html> <html> <head> <meta http-equiv="Content-Type"...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.