Сравнение дат

Тема в разделе "Lotus - Программирование", создана пользователем Galina, 1 июн 2007.

  1. Galina

    Galina Гость

    Подскажите, пожалуйста, как сравнивать даты в LS. У меня не работает следующий код:

    -------------------------------------------------------------------------------------------------
    Dim dt1 As New NotesDateTime (dc.GetItemValue("PhoneStateDateTimeStart")(0))
    Call dt1.AdjustDay(Pr)
    Dim dt2 As New NotesDateTime("Today")

    Msgbox(Format(dt1.DateOnly,"mmm-d-yyyy"))
    Msgbox(Format(dt2.DateOnly,"mmm-d-yyyy"))

    If dt2.DateOnly<dt1.DateOnly Then
    ----------------------------------------------------------------------------------------------------

    Отладочные операторы Msgbox показывают, что dt1.DateOnly соответствует 31.05.07, а dt2.DateOnly
    соответствует 01.06.07.
    Но: dt2.DateOnly<dt1.DateOnly это истина.

    В чем ошибка?
     
  2. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    <!--QuoteBegin-Galina+1:06:2007, 11:31 -->
    <span class="vbquote">(Galina @ 1:06:2007, 11:31 )</span><!--QuoteEBegin-->Отладочные операторы Msgbox показывают, что dt1.DateOnly соответствует 31.05.07, а dt2.DateOnly
    соответствует 01.06.07.
    Но: dt2.DateOnly<dt1.DateOnly это истина.

    В чем ошибка?
    [snapback]67758" rel="nofollow" target="_blank[/snapback]​
    [/quote]
    Потому что свойство DateOnly возвращает строку. Т.е. ты строки сравниваешь. :rolleyes:
     
  3. Galina

    Galina Гость

    Спасибо.
     
  4. velitchestvo

    velitchestvo Гость

    а так:

    If dt1.TimeDifference( dt2 ) < 0 Then
     
Загрузка...
Похожие Темы - Сравнение дат
  1. k85
    Ответов:
    2
    Просмотров:
    1.152
  2. juk-777
    Ответов:
    29
    Просмотров:
    4.706
  3. Реник
    Ответов:
    0
    Просмотров:
    1.082
  4. alb
    Ответов:
    36
    Просмотров:
    10.679
  5. Erlan
    Ответов:
    8
    Просмотров:
    1.640

Поделиться этой страницей