|
|
|
Нуууу не знаааааююююю!!!!!!!!!!!!! (авария со временем)
|
|||
|---|---|---|---|
|
#18+
Нуууу не знаааааююююю что делаааааааааать?!!!!!!!!!!!!!!!!!!!!!!!! Есть условие: If (t_zvonki.Fields(2) > konec_cas_pic Or t_zvonki.Fields(2) < nacialo_cas_pic) And (t_zvonki.Fields(3) > konec_cas_pic Or t_zvonki.Fields(3) < nacialo_cas_pic) Then If (t_zvonki.Fields(2) < #12:00:00 PM# And t_zvonki.Fields(3) > #12:00:00 PM#) Then.............. В t_zvonki.Fields(2) время начала тел звонка В t_zvonki.Fields(3) время конца тел звонка Задача элементарная: мне надо сосчитать длительность звонка в минутах, НО при УСЛОВИИ, что начало звонка до полуночи, а конец уже после полуночи. Пробовала писать #00:00:00# вместо #12:00:00 PM# , но VBA сам правит на свой формат: #12:00:00 PM# При выводе результата получается бред. Вобщем вопрос конкретный: Как написать условие: если начало звонка в промежутке с 18:00 до 00:00 и конец звонка в промежутке с 00:00 до 08:00 то......???? Может кто нибудь знает в чем тут хитрость или знает ссылку на FAQ где об этом че-нить написано? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.04.2004, 14:56 |
|
||
|
Нуууу не знаааааююююю!!!!!!!!!!!!! (авария со временем)
|
|||
|---|---|---|---|
|
#18+
Почему бы не хранить время в формате дата/время Тогда Кол_мин=DateDiff("n", t_zvonki.Fields(2) , t_zvonki.Fields(3)) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.04.2004, 15:12 |
|
||
|
Нуууу не знаааааююююю!!!!!!!!!!!!! (авария со временем)
|
|||
|---|---|---|---|
|
#18+
А что такое "n"? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.04.2004, 15:16 |
|
||
|
Нуууу не знаааааююююю!!!!!!!!!!!!! (авария со временем)
|
|||
|---|---|---|---|
|
#18+
Значение Описание yyyy Год. q Квартал. m Месяц. y День года. d День месяца. w День недели. ww Неделя. h Часы. n Минуты. s Секунды. Интервал при "n" выражается в минутах ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.04.2004, 15:19 |
|
||
|
Нуууу не знаааааююююю!!!!!!!!!!!!! (авария со временем)
|
|||
|---|---|---|---|
|
#18+
Да, я понимаю, что ты хочешь сказать, но мне для этого всю базу переворачивать вверх дном надо :) Вот если б я раньше знала..... У меня это дело выглядит так: кол_мин = 1440 - (Minute(.Fields(2)) + (Hour(.Fields(2)) * 60)) + (Minute(.Fields(3)) + (Hour(.Fields(3)) * 60)) т.е. например звонок с 23:55:00 до 00:05:00, тогда (24:00:00-23:55:00)+00:05:00 p.s. 24 часа = 1440 мин ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.04.2004, 15:33 |
|
||
|
Нуууу не знаааааююююю!!!!!!!!!!!!! (авария со временем)
|
|||
|---|---|---|---|
|
#18+
А если так (оставьте формат только времени) Dim Kol_min As Long Kol_min =DateDiff("n", t_zvonki.Fields(2) , t_zvonki.Fields(3)) 'Kol_min = DateDiff("n", #11:55:00 PM#, #12:05:00 AM#) If Kol_min < 0 Then Kol_min = Kol_min + 1440 ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 28.04.2004, 15:45 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32501086&tid=1674965]: |
0ms |
get settings: |
9ms |
get forum list: |
17ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
210ms |
get topic data: |
9ms |
get forum data: |
3ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 243ms |
| total: | 532ms |

| 0 / 0 |
