Вот, добрался.
Попробую пошагово показать как я реализовывал данную программку.
- Создаём Windows Forms Application.
- Добавить библиотеку типов - domino.tlb. Для этого в меню Project\Add Reference где в проводнике и находим нужную библиотеку (ищите в месте установке клиента Lotus Notes). Visual Studio сам создаст "обёртку" к данной библиотеке и Вы сможете использовать "родные" для Вас notes-классы.
- Я для себя определил следующюю схему:объявляю глобальную переменную нотес-сессии(Domino.NotesSession nsSession), по желанию пользователя инициирую, а сбор данных веду в отдельном потоке.
- Для сбора данных в отдельном потоке использую отдельный самописный клас(ThreadsElements) который "асинхронно" используется в компоненте
Ссылка скрыта от гостей
- Собранные данные скидываю в компоненту
Ссылка скрыта от гостей
, а при необходимости вывожу всплывающее сообщение из системного трея ( компонента
Ссылка скрыта от гостей
).
Листинг на C# ( Visual Studio 2010 )
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">Компоненты - описание</div></div><div class="sp-body"><div class="sp-content">
/*
* imageList1 - компонента, контейнер рисунков(для отображения в сис.трее)
* dtGridMain - компонента-таблица для отображения списка новых сообщений
* backgroundWorker1 - комп.-для работы в отдельном потоке(читать литературу)
* cmsIconMenu - комп.-контекстное меню, для иконки
* btnConnect - кнопка включить
* btnOff - кнопка "свернуть в трей"
* btnClose - кнопка "Выключить и выйти"
* tbCntrlMain -комп.-табуляторный контрол с 2мя закладками ( tabPage1 и tpOptions )
* txtbxServer, txtbxDataBase, txtbxView - комп.-текстбоксы с настройками "куда" смотреть
* comboBox1 - комп.-комбобокс в которой выбираеться временной интервал для запросов
* rbDBlClickChColor, rbDBlClickDelFromGrid - комп.-радобатон для выбора действия при клике на новом сообщении ( менять цвет или удалять из списка)
* chBxHideInTrayOnDblClick - комп.-чекбокс для сворачивания окна программки при открытии ссылки на новое сообщение.
*/
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">Обьявление гл.переменных </div></div><div class="sp-body"><div class="sp-content">
C++:
Domino.NotesSession nsSession;
ThreadsElements asyncObj = new ThreadsElements();
Boolean mClose = false;
int iOffLine = 0;
int iOnLine = 5;
int iNewMsg = 1;
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">Кнопка включить</div></div><div class="sp-body"><div class="sp-content">
C++:
private void btnConnect_Click(object sender, EventArgs e)
{
if (nsSession == null) {
try
{ nsSession = new Domino.NotesSession(); }
catch (Exception err)
{
MessageBox.Show(err.Message);
}
}
try
{ nsSession.Initialize(); }
catch (Exception err)
{
nsSession = null;
MessageBox.Show(err.Message);
}
if (nsSession == null)
{
nicnMain.ShowBalloonTip(300, "Ошибка", "Подключиться не удалось", ToolTipIcon.Error);
nicnMain.Text = "Авто оповещение [Откл.]";
}
else
{
if ( asyncObj.IsConnected == false )
asyncObj = new ThreadsElements()
{
IsConnected = true,
ServerName = txtbxServer.Text,
DBName = txtbxDataBase.Text,
ViewName = txtbxView.Text,
s = nsSession,
iSleep = System.Convert.ToInt32(comboBox1.Text) ,
IsFirstTimeRun = true
};
nicnMain.Text = "Авто оповещение [Bкл.]";
backgroundWorker1.RunWorkerAsync(asyncObj);
tbCntrlMain.TabPages["tpOptions"].Enabled = false;
tbCntrlMain.SelectedTab = tbCntrlMain.TabPages[0];
btnConnect.Enabled = false;
Hide();
}
}
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">Кнопка - свернуть в трей</div></div><div class="sp-body"><div class="sp-content">
C++:
private void btnOff_Click(object sender, EventArgs e)
{
Hide();
}
Компонента backgroundWorker1 имеет два события DoWork (зделать чтотоd отдельном потоке) и RunWorkerCompleted(что сделать по завершении выполнения потока)
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">backgroundWorker1</div></div><div class="sp-body"><div class="sp-content">
C++:
private void backgroundWorker1_DoWork(object sender, DoWorkEventArgs e)
{
ThreadsElements teTest = e.Argument as ThreadsElements;
if (teTest.IsFirstTimeRun == true)
{
teTest.IsFirstTimeRun = false;
}
else
{
if (teTest.iSleep > 0)
{
Thread.Sleep(teTest.iSleep);
}
else
{
Thread.Sleep(300000);
}
}
if (teTest.s == null)
{
try
{ teTest.s.Initialize(); }
catch (Exception err)
{
teTest.s = null;
teTest.IsConnected = false;
MessageBox.Show(err.Message);
nicnMain.Text = "Авто оповещение [Откл.]";
}
}
if (teTest.s == null) { nicnMain.ShowBalloonTip(300, "Ошибка", "Подключение потеряно", ToolTipIcon.Info); }
else
{
try
{
Domino.NotesDatabase ndbTest;
Domino.NotesDocument ndTmp;
Domino.NotesDocumentCollection ndColl;
Domino.NotesView nvTest;
NotesMemos nmTmp;
int iNew = 0;
ndbTest = teTest.s.GetDatabase(teTest.ServerName, teTest.DBName, false);
nvTest = ndbTest.GetView(teTest.ViewName);
ndColl = nvTest.GetAllDocumentsByKey(nsSession.UserName, true);
ndTmp = ndColl.GetFirstDocument();
while (ndTmp != null)
{
if (teTest.HasURL(ndTmp.NotesURL.ToString())==false)
{
iNew++;
nmTmp = new NotesMemos();
nmTmp.sNotesURL = ndTmp.NotesURL.ToString();
nmTmp.sCreatedDate = ndTmp.Created.ToString();
nmTmp.sTitle = ndTmp.GetFirstItem("Subject").Text.ToString();
teTest.AllInfo.Add(nmTmp);
}
ndTmp = ndColl.GetNextDocument(ndTmp);
}
}
catch (Exception nErr)
{
nicnMain.ShowBalloonTip(3000, "Подключение потеряно", nErr.Message, ToolTipIcon.Error);
}
e.Result = teTest;
}
}
private void backgroundWorker1_RunWorkerCompleted(object sender, RunWorkerCompletedEventArgs e)
{
ThreadsElements teTest = e.Result as ThreadsElements;
int n = 0;
int c = 0;
if (teTest.IsConnected)
{
foreach ( NotesMemos sURL in teTest.AllInfo )
{
if (sURL.IsNew)
{
n = dtGridMain.Rows.Add();
dtGridMain.Rows[n].Cells[0].Value = (n+1).ToString();
dtGridMain.Rows[n].Cells[1].Value = sURL.sCreatedDate;
dtGridMain.Rows[n].Cells[2].Value = sURL.sTitle;
dtGridMain.Rows[n].Cells[3].Value = sURL.sNotesURL;
c++;
sURL.IsNew = false;
}
}
if (c > 0)
{
nicnMain.ShowBalloonTip(3000, "Внимание", "Новых сообщений: " + c.ToString() + " \n" + "Всего " + dtGridMain.Rows.Count.ToString(), ToolTipIcon.Info);
nicnMain.Text = "У Вас новых/всего сообщений " + c.ToString() + " / " + dtGridMain.Rows.Count.ToString() + "";
}
}
else
{
asyncObj = new ThreadsElements()
{
IsConnected = true,
ServerName = txtbxServer.Text,
DBName = txtbxDataBase.Text,
ViewName = txtbxView.Text,
iSleep = System.Convert.ToInt32(comboBox1.Text),
s = nsSession
};
}
backgroundWorker1.RunWorkerAsync(asyncObj);
}
И так, таблицу наполнили, запросы идут, уведомление из трея вылазит.
Осталось дорисовать открытия документа по двойному клику из ДатаГрид'a
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">Двойной клик по записи в таблице</div></div><div class="sp-body"><div class="sp-content">
C++:
private void dtGridMain_CellDoubleClick(object sender, DataGridViewCellEventArgs e)
{
int n = e.RowIndex;
try
{
System.Diagnostics.Process.Start(dtGridMain.Rows[n].Cells["NURL"].Value.ToString());
dtGridMain.ClearSelection();
if (chBxHideInTrayOnDblClick.Checked)
Hide();
if (rbDBlClickChColor.Checked)
{
for (int i = 0; i <= dtGridMain.Rows[e.RowIndex].Cells.Count; i++)
{
dtGridMain.Rows[e.RowIndex].Cells[i].Style.BackColor = Color.LightGray;
}
}
else
{
nicnMain.Text = "У Вас всего сообщений " + dtGridMain.Rows.Count.ToString();
dtGridMain.Rows.Remove(dtGridMain.Rows[e.RowIndex]);
}
}
catch { }
}
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">При закрытии - свернуть в трей</div></div><div class="sp-body"><div class="sp-content">
C++:
private void Form1_FormClosing(object sender, FormClosingEventArgs e)
{
if (e.CloseReason != CloseReason.TaskManagerClosing &&
e.CloseReason != CloseReason.WindowsShutDown && mClose != true)
e.Cancel = true;
this.WindowState = FormWindowState.Minimized;
Hide();
}
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">Класс для работы в паралельном потоке</div></div><div class="sp-body"><div class="sp-content">
C++:
public class ThreadsElements
{
public Boolean IsConnected = false;
public Domino.NotesSession s = null;
public String ServerName = "";
public String DBName = "";
public String ViewName = "";
public Boolean IsFirstTimeRun = false;
public List<NotesMemos> AllInfo = new List<NotesMemos>();
public int iSleep
{
get
{
return iMlSSlep;
}
set
{
if (value > 0)
{
iMlSSlep = value * 1000 * 60;
}
else
{
iMlSSlep = 300000;
}
}
}
private int iMlSSlep = 300000;
public Boolean HasURL ( String sURL )
{
if (AllInfo.Count > 0)
{
foreach (NotesMemos k in AllInfo)
{
if (k.sNotesURL.Equals(sURL)) return true;
}
}
return false;
}
}
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">NotesMemos - класс для описания нотес-документа</div></div><div class="sp-body"><div class="sp-content">
C++:
public class NotesMemos
{
public String sNotesURL = "";
public String sCreatedDate = "";
public String sTitle = "";
public Boolean IsNew = true;
}
Это, фактически, аналог встроенного minder'а в клиент Notes, с той лишь разницей, что мониторить можно любую доступную базу, проделав для этого минимум дизайнерский ухищрений.<p>Архитектура: Приблуда работает используя domino.tlb версии 6.5.4 ( тестировалась на 7.0.2 и 8.5.х клиентах ), в себе не хранит никаких данных (кроме тех что отображены на экране) и использует текущие настройки пользователя (расположение ИД-файла, подключения к серверу - используются нотес-имена). <p>Требования:Инсталлированный (или зарегистрированный как СОМ-Сервер в реестре Windows ) клиент Нотес, FrameWork 3.5 и выше, предоставление доступа для самого приложения (не всегда). 
Пасмотрим что тут у нас
Сама программка<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">Старая версия</div></div><div class="sp-body"><div class="sp-content">З.Ы. В принципе ничего не мешает доделать опцию запоминания пароля, но я специально не делал этого, т.к. не располагаю достаточными знаниями в криптовании, и не уверен что смогу достойно защитить пароли ( пока что ).
