LotusScript эквивалентна @ IsValid
Нам очень нравится формула @ IsValid, чтобы проверить, если документ действителен до выполнения другой работы, но иногда мы не используем формулу языка, поэтому сценарий эквивалент не требуется.
При написании сценария, и вы хотите узнать, если текущий документ имеет какие-либо ошибки проверки, используйте этот код:
Dim WS As New NotesUIWorkspace
Dim uidoc Как NotesUIDocument
Установите uidoc = ws.CurrentDocument
On Error Resume Next 'Ошибки Trap
Вызовите uidoc.Refresh
On Error Goto 0 'Сброс обработчик ошибок
If Err <> 0 Then
Err = 0 'очистить его, иначе следующий раз он будет установлен, даже если это не ошибка
Выход Exit Sub 'со времени проверки не удалось
End If
«... Продолжать с вашим кодом
Просмотрено 6280 раз 1675 зрителей
