Выборка Документов + Notesdaterange

[Cleric84]

Всем привет:

Хочу узнать количество документов в вюхе которые удоволетворяют данные в NotesDateRange.
Если в NotesDateRange засунуть только даты все ок, НО если я питаюсь засунуть дата + время результат 0.

Вопрос:

С помощюю етого метода можна задать диапазон только через даты? или у мну косяки в коде....

 

[savl]

1. а в полях время есть?
2. Как идет проверка диапазона?

 

[Cleric84]

savl

Да есть, вюха содержыт одну колонку. Колонка отображает дата + время.

вопрос о проверке не понял....

А Вы чтото подобное реализировали? может у мну вюха криво настроена....

 

[savl]

Кажись вот ответ: link removed

 

[Cleric84]

savl

Я читал ету тему. Еще раз повторюсь, если я задаю диапазон с дат все ок, все работает. Проблемы начинаются если добавить время.
В колонке данные отображаю через формулу @TextToTime (пробовал и без формулы).

 

[savl]

Забавно, только что сделал нечто похожее.
Вьюха, первая колонка сортирована, Date/Time отображения год, месяц, день, час, минута, секунда.
Отображается поле, которое Date/Time отображения год, месяц, день, час, минута, секунда.
В поле только одно значение
Сортировка по первой колонке, категоризации нет.
Код кнопки:

Set view = ws.CurrentView.View
Set dtr = ses.CreateDateRange

Set dtr.StartDateTime = New NotesDateTime(Datenumber(2013, 08, 19) + Timenumber(13, 15, 26))
Set dtr.EndDateTime = New NotesDateTime(Datenumber(2013, 08, 19) + Timenumber(13, 25, 45))

Set nvec = view.GetAllEntriesByKey(dtr,True)
Msgbox "" & nvec.count & ": " & dtr.StartDateTime.TimeOnly & " - " & dtr.EndDateTime.TimeOnly

Если брать диапазон : 19/08/2013 13:15:19 - 19/08/2013 13:25:45, то найдет 5 документов
Если брать диапазон : 19/08/2013 13:15:26 - 19/08/2013 13:25:45, то найдет 4 документа
Если только дата, то всегда 5 документов
А как у вас?

 

[Cleric84]

savl

Клас

А вот у мну не работает, если напрямую закинуть DateRange как ключ.
но вот в етой теме DateRange я сделал как nvy

Redim key(0) As Variant
Set key(0) = dateRange

Set view = db.getView("viewName")
Set entries = view.GetAllEntriesByKey(key, True)

и о чудо все заработало....

 

[savl]

Моя версия клиента: Release 8.5.3FP2
может в этом дело.

 

[Cleric84]

savl

У мну 8.5.1

Главное заработало

 

[VladSh]

Можно удалять дублирующуюся тему?