sa
|
 Posted: Thu Oct 29, 2015 09:43 Post subject: |
 |
|
Попробовал изменить скриптовую функцию Test проверки соответствия временному промежутку таким образом, чтобы бы она давала результат, схожий с результатом стандартной опции "Не старше" диалога поиска ТК: | Code: | Function Test(Item)
Dim D, Cnt, UT
If DType = 1 Then D = Item.DateCreated Else D = Item.DateLastModified
If (UTime = "s") or (UTime = "n") or (UTime = "h") Then UT = "s" Else UT = "d"
Cnt = DateDiff(UT, D, DateAdd(UTime, -Count, DNow))
Test = Eval(Cnt & Comp1 & 0)
If C > 5 Then
Cnt = DateDiff(UT, D, DateAdd(UTime, -Count2, DNow))
Test = Test And Eval(Cnt & Comp2 & 0)
End If
End Function |
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
