Общие вопросы > Разработка приложений

Отображение изменений в задаче

<< < (2/5) > >>

ViV:
Не забывайте приводить текст ошибки!

K85:
Ошибка: Object variable not set
в строке: doc.Subject =   uidoc.FieldGetText( "Title" )

ViV:
Продебажьте, посмотрите почему пустой объект.

K85:
понял... не в ту сторону начал смотреть.... не подходит такой вариант, его надо запускать в самом доке да и с оздавать новую задачу, а не редактировать старую  >:(

K85:

--- Код: ---Dim directory As NotesDbDirectory
Dim db As NotesDatabase
server$ = "NameServer"
Set directory = New NotesDbDirectory( server$ )
dbType% = DATABASE
Set db = directory.GetFirstDatabase( dbType% )
counter% = 0
While Not ( db Is Nothing )
counter% = counter% + 1
Set db = directory.GetNextDatabase
If Cstr(Lcase(Left(db.Filepath, 4))) = "mail" Then
Messagebox db.FilePath,,server$
Dim ProcessDb As New NotesDatabase("", "")
Call ProcessDb.Open(db.Server, db.Filepath)
If ProcesDb.IsOpen Then
Dim collection As NotesDocumentCollection
Set collection = db.Search(.....) мне надо найти документы, которые есть в базе (я так понимаю по их Unid)
If collection.Count > 0 Then
.... ' обновить данные в почтовых базах
End If
End If
End If
Wend
--- Конец кода ---
Правильно ли я понял и как найти документы по Unid и обновить данные в почтовых базах?

Навигация

[0] Главная страница сообщений

[#] Следующая страница

[*] Предыдущая страница