с "удаленной базой", есть - CORBA называется
др. словами - "серверная" часть нужна, её роль либо выполняет сам клиент и задействуются мс пердульки типа комы, либо вызывается сервер "по сети" с соответ. интерфейсом (из доступных - CORBA)
др. словами - "серверная" часть нужна, её роль либо выполняет сам клиент и задействуются мс пердульки типа комы, либо вызывается сервер "по сети" с соответ. интерфейсом (из доступных - CORBA)
в Lotus, если правой кновкой мыши кликнуть на созданной папке в Folders, будет опция "Design Folder".
ну эт вы зря -_- - там всего один файл (java либа), кот. суть интерфейс к вызовам, единственное - код д.б. на java
с др. стороны - по объектному виду он мало отличается от VB/LS
Основная проблема почему второй пользователь не автор для входящего письма, причем даже на уровне editor.
lsv
Можете определить на какой строке выпадает ошибка: Notes error: You cannot update or delete the document(s) since you are not listed as an allowable Author for this document. ?
Print или как еще можно вывести...
Подозреваю что на сохранении, но хотелось бы уточнить.
lsv
Можете определить на какой строке выпадает ошибка: Notes error: You cannot update or delete the document(s) since you are not listed as an allowable Author for this document. ?
Print или как еще можно вывести...
Подозреваю что на сохранении, но хотелось бы уточнить.
точно, на этой: Call doc.Save( False, False, True )
Вместо этого метода, пытался использовать Call doc.PutInFolder("Processed")(Processed - это папака в Folders), что бы при последующем запуске скрипта, он обрабатывал только новые сообщения в Inbox. Выдаёт ошибку "Notes error: You are not autorized to perform that operation".
Оказывается, у второго пользователя нет прав для создания папок, соответственно я не могу переместить обработанные сообщения с вложениями в папку Processed из Inbox.
Получается, что нет прав для пометки сообщений прочитанными (You cannot update or delete the document(s) since you are not listed as an allowable Author for this document.), метод Call doc.Save( False, False, True ) так же не работает.
UnprocessedDocuments, markAllRead и т.п. методы в VBScript (COM) не работают.
Получается, у меня есть скрипт, который может сохранять вложения из писем, приходящих второму пользователю, но у меня нет возможности сделать так, что бы он не брал их в обработку повторно.
бредObject doesn't support this property or method: 'MarkUnread'Прикольно
Попробуй сделать:
Вместо SaveКод:Call doc.MarkUnread()
без запущенного лотуса vbscript скрипт работать не будет
послед. такая:
1. скрипт шедулером запускается каждую минуту
2. смотрит почту на предмет наличия письма с вложение
3. сохраняет влож. на сетевой диск
lsv
Вот к 35-му сообщению и до сути дела дошли.
Есть тема напиши свой Notes Minder, собственно можно попросить Морфиуса доработать, - опцию какую-нить добавить для сохранения вложений. Гарантии нет, но "а вдруг"?
Добавлено: наверное такой функционал добавлять не сильно интересно, но вот добавить возможность выполнения внешнего кода, это интересно! Например Майндер определяет массив UNID'ов новых (непрочитанных) доков и вызывает для них скрипт (передаёт этот массив в скрипт).
Вот к 35-му сообщению и до сути дела дошли.
Есть тема напиши свой Notes Minder, собственно можно попросить Морфиуса доработать, - опцию какую-нить добавить для сохранения вложений. Гарантии нет, но "а вдруг"?
Добавлено: наверное такой функционал добавлять не сильно интересно, но вот добавить возможность выполнения внешнего кода, это интересно! Например Майндер определяет массив UNID'ов новых (непрочитанных) доков и вызывает для них скрипт (передаёт этот массив в скрипт).
мне удалось выбить из админов права editor для второго пользователя, т.о. я добился того, что сначала сообщение помещается в папку processed, потом удаляется из inbox, вложения сохраняются на сетевой диск и пишется автоответ. поставил скрипт в шедулер на выполнение каждую минуту, т.ч., в принципе, задача выполнена, НО
также, как и Notes Minder, скрипт без установленного Lotus на раб. станции работать не будет.
Правильно я понял, что без установленного Lotus'а, подконнектиться к ящику стандартными vbscript средствами не возможно?
Добавлено: кому интересно, итоговый скрипт:
Код:
Dim Session
Dim Maildb
Dim view
Dim doc
Dim x
Set Session = CreateObject("Lotus.NotesSession")
Call Session.Initialize("password")
Set Maildb = Session.GetDatabase("SERVER/LOTUS/DOMEN/RU", "GroupMail\mail.nsf")
Set view = Maildb.GetView("($inbox)")
If Not Maildb.IsOpen Then
If Not Maildb.Open Then Exit Sub
End If
With view
x = 0
ReDim LmailID(x)
Set doc = .GetFirstDocument
If doc Is Nothing Then
MsgBox "No letters"
WScript.Quit()
Else
Call doc.PutInFolder("Processed")
Call doc.Removefromfolder("($inbox)")
Do
fileNames = Session.Evaluate("@AttachmentNames", doc)
For Each Filename In fileNames
If Filename <> "" Then
If Right(Filename, 3) = "txt" Then
Call doc.Save(False, False, True)
Set NotesEmbeddedObject = doc.GetAttachment(Filename)
NotesEmbeddedObject.ExtractFile("\\server\d$\folder\" + Filename)
Set reply = doc.CreateReplyMessage(False)
Call reply.replaceItemValue("Subject", "done" + Filename)
Call reply.Send(False)
End If
End If
Next
x = x + 1
ReDim Preserve LmailID(x)
Set doc = .GetNextDocument(doc)
Wscript.Sleep 500
Loop Until doc Is Nothing
End If
End With
Set doc = Nothing
Set view = Nothing
Set Maildb = Nothing
Set Session = Nothingкоротко - да...
давайте расуждать:
-как можно использовать "чужой ф-ционал"? - через "некий" АПИ
-как АПИ реализуется? - "чужие" длл, вызовы по стандартным протоколам, кот. поддерживаются ОС и её ср-вами
в случае домины, "чужие длл", существуют тока в виде полного клиента/сервера нотус (ну вот так индусы любят писать)
реализованы стандартные "протоколы" взаимодействия, в домине: IMAP, SMTP, POP3,
Ссылка скрыта от гостей
, ну это не протокол , а вот IIOP - что уже протокол мелкомягкость проталкивала/ет свои COM, DCOM и заморачиваться на стандарты не собиралась/не собирается (свои плодит)
а по сему, как факт - CORBA для VB - это из области маловероятного
"не долго задумываясь" ИБМ просто сделала java либу, кот. и позволяет взаимодействовать с сервером домины, поверх http/https
разумеется что Notes.jar не будет работать без "клиента нотус", но вот для "удалённых" вызовов достаточно NCSO.jar
а учитывая что и МС похоронила свой ВБ - никто не расстраивается, а просто - учит java
lsv
Подправил код в Вашем сообщении.
lmike
Уже увидел твоё сообщение позже.
Дай тогда ссылки, в какую сторону копать. А если ссылки даже на код, то тоже не постесняемся)), тема интересная.
Подправил код в Вашем сообщении.
Ну а как скрипт узнает о Lotus-классах? При установке клиента в реестре регятся компоненты OLE и COM, которые и открывают возможность внешним прогам использовать Lotus-классы. Поэтому лучше бы это было в агентах почтового ящика, чтобы от этого всего не зависеть.
lmike
Уже увидел твоё сообщение позже.
Дай тогда ссылки, в какую сторону копать. А если ссылки даже на код, то тоже не постесняемся)), тема интересная.
VladSh я активно темой не занимался, были где-то тесты (всё работало), просто не возникало активной надобности, в хэлпе достаточно подробно описано...
минимальная настройка на сервере - задачи http, diiop, интернет пароль у юзера
для https придется еще (после запуска задач) скачать на локал сертификат (TrustedCerts.class) - он на сервере появится, разумеется, что все остальные настройки https должны быть выполнены (но это не касается напрямую diiop)
минимальная настройка на сервере - задачи http, diiop, интернет пароль у юзера
для https придется еще (после запуска задач) скачать на локал сертификат (TrustedCerts.class) - он на сервере появится, разумеется, что все остальные настройки https должны быть выполнены (но это не касается напрямую diiop)
Обучение наступательной кибербезопасности в игровой форме. Начать игру!