Настройки для других календарей хранятся в профиле календаря в пункте "CalURLs".
Иногда эта информация искажается, что приводит к такой ошибке.
Вы можете использовать такие инструменты, как "notespeek" или Ytria ScanEZ, чтобы проверить содержимое поля и исправить его. Каждая запись выглядит следующим образом: отображаемое имя, тип, имя пользователя, значок, цвет фона, цвет переднего плана и некоторые флаги:
Micky Maus/Certifier'notesCalendar:Micky Maus/Certifier:0:null'calendar gray.png'{206,212,225}'{57,87,122}'1
Чтобы сбросить записи (если вы не можете исправить это с помощью кода), вы можете использовать этот код в агенте или кнопку действия в почтовом файле пользователя:
Dim ses as New NotesSession
Dim db as NotesDatabase
Dim docProfile as NotesDocument
Set db = ses.CurrentDatabase
Set docProfile = db.getProfileDocument( "CalendarProfile" )
if docProfile.HasItem( "CalURLs" ) then
call docProfile.RemoveItem( "CalURLs" )
call docProfile.Save( True, True, True )
Messagebox "CalURLs habe been removed, please reopen the database and recreate them"
End if
Этот код полностью не проверен и может содержать опечатки, но он должен указывать вам правильное направление.