Access to AddressBook from VBScript

Ilya Evseev

unread,

Mar 30, 2004, 9:18:33 PM3/30/04

to

Всем привет.
Имеется Win2k Rus Pro, Outlook Express 6.0.
Требуется из VBScript управлять адресной книгой:
добавлять записи, просматривать, сортировать.
Вопрос: как?

Через MAPI не получается.
Скачал MAPI32.OCX, установил (regsvr32), включил лицензию (vb6controls.reg).
Результат: axMAPISession и axMAPIMessages, появившиеся в VStudio.NET,
не содержат никаких выходов к адресной книге.

Через OLE не получается.
Все стандартные примеры сначала создают объект "Outlook.Application".
Ветка HKCR в моём реестре такой секции не содержит.
Есть OutlookExpress.AddressBook, .Envelope, MessageList и MimeEdit.
Результат: set app = CreateObject("Outlook.Application")
завершает test.vbs с ошибкой.

Нашел пример http://www.visualbasicforum.com/showthread.php?t=127375
где используется класс MAPI.Session с членами .Version и .AddressBook,
но такого класса в моём реестре тоже нет.

Куда копать дальше?

С уважением,
Илья Евсеев

meteor

unread,

Apr 3, 2004, 4:59:31 PM4/3/04

to

не думаю что я лично смогу чем-либо быть полезен, но здесь
http://yvolksoft.narod.ru/yvReminder/index_ru.html я думаю тебе помогут

Sergey Prokopenko 56158957

unread,

May 11, 2004, 4:18:40 AM5/11/04

to

Hello, meteor!
You wrote on Sun, 4 Apr 2004 00:59:31 +0300:

m> не думаю что я лично смогу чем-либо быть полезен, но здесь
m> http://yvolksoft.narod.ru/yvReminder/index_ru.html я думаю тебе
m> помогут

А как бороться с 1601 годом? Похоже Волков его так и не смог побороть. А
"ошибка" вошла во все новые версии OE\патчей.

====
Как оказалось, обходной путь, найденный для этой ошибки, не работает для
некоторых конфигураций программного обеспечения, (например, об этом сообщают
пользователи Windows XP). Если даты всех событий: "1 Января 1601 года", - то
это означает, что yvReminder пытается представить "почти ноль" в качестве
настоящей даты... и, возможно, единственным способом избавиться от этой
ошибки будет удалить указанное "обновление". Оно называется как-то наподобие
"Outlook Express Update Q330994" в меню "Панель управления ->
Добавить/Удалить Программы".
=====

До свидания, успехов!
====================
Lam I. В моём адресе слово "новость" - для свена.

Mikhail Zhilin

unread,

May 11, 2004, 5:14:21 AM5/11/04

to

OE Update 330994 два месяца назад заменён на OE Update 837009
--
Михаил Жилин (Microsoft MVP - Win9x)
http://www.aha.ru/~mwz
http://www.dts-l.org/
Remove "remove." from my e-mail address
======

On Tue, 11 May 2004 16:18:40 +0800, "Sergey Prokopenko 56158957"
<lam...@kbc.ru> wrote:

>Hello, meteor!
>You wrote on Sun, 4 Apr 2004 00:59:31 +0300:
>
> m> не думаю что я лично смогу чем-либо быть полезен, но здесь
> m> http://yvolksoft.narod.ru/yvReminder/index_ru.html я думаю тебе
> m> помогут
>
> А как бороться с 1601 годом? Похоже Волков его так и не смог побороть. А
>"ошибка" вошла во все новые версии OE\патчей.
>
>====

>...........будет удалить указанное "обновление". Оно называется как-то наподобие
>"Outlook Express Update Q330994".......................
>=====
>

Sergey Prokopenko 56158957

unread,

May 11, 2004, 7:36:16 AM5/11/04

to

Hello, Mikhail!
You wrote on Tue, 11 May 2004 13:14:21 +0400:

MZ> OE Update 330994 два месяца назад заменён на OE Update 837009 --
MZ> Михаил Жилин (Microsoft MVP - Win9x)

Impact of vulnerability: Remote Code Execution
Maximum Severity Rating: Critical
Recommendation: Customers should apply the update immediately.

А может есть другой напоминатель, считывающий корректно хэпи бёздыи?