Поисковый Запрос

[StarikStarik2705]

Всем привет. Буду честен. В упор забыл как сравнить две даты в поисковом запросе.
Query = {FORM = "task" & Date= }& Trim(dlg_doc.GetItemValue("Date_Start")( 0 )) &{}
такой запрос говорит что я в корне не прав. Стыдно писать по такой мелочи, но это лучше чем промолчать)

 

[garrick]

Либо использовать функцию @Date, получив из вашей даты отдельно год, месяц и день, либо взять дату в квадратные скобки, но тут будет важен формат написания даты.

 

[StarikStarik2705]

Либо использовать функцию @Date, получив из вашей даты отдельно год, месяц и день, либо взять дату в квадратные скобки, но тут будет важен формат написания даты.

квадратные я думал в FTSearch используеться

 

[StarikStarik2705]

квадратные я думал в FTSearch используеться

всё разобрался))
Dim dat As New NotesDateTime (dlg_doc.GetItemValue("date_start")( 0 ))
dates = dat.DateOnly
days = Cint(Trim(Strleft(dates,".")))
months = Cint(Trim(Strleft(Strright(dates,"."),".")))
years = Cint(Trim(Strrightback(dates,".")))
dates = years & ";" & months & ";" & days
Query = {FORM = "task" & Date => @date( } & dates & {)}

 

[Medevic]

Не совсем правильно.
Надо так:

Dim dat As Variant
dat = dlg_doc.GetItemValue("date_start")( 0 )

days = Day(dat)
months = Month(dat)
years	 = Year(dat)
dates = years & ";" & months & ";" & days
Query = {FORM = "task" & Date => @date( } & dates & {)}

 

[StarikStarik2705]

Не совсем правильно.
Надо так:

Dim dat As Variant
dat = dlg_doc.GetItemValue("date_start")( 0 )

days = Day(dat)
months = Month(dat)
years	 = Year(dat)
dates = years & ";" & months & ";" & days
Query = {FORM = "task" & Date => @date( } & dates & {)}

Благодарю так и сделаю

 

[garrick]

...dates = years & ";" & months & ";" & days

Cstr не надо? (Integer)years & ";" нормально сложится?

 

[Medevic]

Для "&" не надо.