пятница, 9 октября 2009 г.

Lotus Notes. Отправка писем через javascript.


Лотус очень интересная штука, оказывается можно незаметно для пользователя отправлять письма из сторонних приложений, если у него запущен клиент lotus notes. Даже если он не запущен, то при обращении к библиотеки notes он автоматически запуститься.

Пример скрипта, написанный на javascript:
var mToMail="admin@freetime-at-work.blogspot.com";
var mSub="письмо из скрипта";
var mMsg="\
Добрый день!\n\
\n\
С уважением,\n\
Администрация блога freetime-at-work.blogspot.com\n\
";
var Maildb;
var UserName;
var MailDbName;
var MailDoc;
var AttachME;
var Session;
var EmbedObj;
var server;
Session = new ActiveXObject('Notes.NotesSession');
if(Session !=null)
{
    UserName = Session.UserName;
    MailDbName = UserName.substring(0,1) + UserName.substring(UserName.indexOf( " " ,1) + 1 ,UserName.length) + ".nsf";
    Maildb = Session.GetDatabase("", MailDbName);
    if(Maildb.IsOpen != true)
    {
        Maildb.OPENMAIL();
    }
    MailDoc = Maildb.CREATEDOCUMENT();
    MailDoc.Form = 'Memo';
    MailDoc.sendto = mToMail;
    MailDoc.Subject = mSub;
    MailDoc.Body = mMsg
    MailDoc.SAVEMESSAGEONSEND = false;
    MailDoc.Send(false);
    MailDoc.Save(false, true);
    Maildb = null;
    MailDoc = null;
    AttachME = null;
    EmbedObj = null;
    Session.Close();
    Session = null;
}

Комментариев нет:

Отправить комментарий