|
|
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
Есть две даты начала работы и конца работы, есть ли встроенная функция подсчитывающая количество месяцев на работу, поделитесь? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 14:48:19 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
А нафиг она? Year(MyDate1)*12+Month(MyDate1)-Year(MyDate2)*12-Month(MyDate2) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 14:52:14 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
DateDiff - не то? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 14:53:04 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
прога сначала опеделись, что такое месяц:30 или 31 или 28 или 29 дней ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 14:55:22 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
если исп. datediff , то возвращает количество переходов из одного месяца в другой ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 14:57:58 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
to paparome: Я тебя обожаю. (за телепатию) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 15:03:56 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
ищесли исп. datediff , то возвращает количество переходов из одного месяца в другой Year(MyDate1)*12+Month(MyDate1)-Year(MyDate2)*12-Month(MyDate2) та же фигня :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 15:04:59 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
авторта же фигня :) Но зато в три раза длинее :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 23.06.2004, 15:20:28 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
не работает, выдаёт ошибку, помогите Private Sub Кнопка2_Click() Dim rcd As DAO.Recordset Dim db As DAO.Database Set db = CurrentDb Dim h Set rcd = db.OpenRecordset("balance", dbOpenDynaset, dbSeeChanges) Do If rcd.EOF Then GoTo exit1 rcd.Move 3 k = rcd!time_balance rcd.MoveLast l = rcd!time_balance h = DateDiff("m", " & k & ", " & l & ")<<------------------ошибка здесь!!! MsgBox (" & h & ") Loop exit1: End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 11:24:35 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
" & k & " - это что за бред сумасшедшего? Вы всегда так переменные в функции передаете? просто k написать не судьба? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 11:27:04 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
Всё исправил Туплю с утра. код Private Sub Кнопка2_Click() Dim rcd As DAO.Recordset Dim db As DAO.Database Set db = CurrentDb Dim h Dim k As Date Dim l As Date Set rcd = db.OpenRecordset("balance", dbOpenDynaset, dbSeeChanges) Do If rcd.EOF Then GoTo exit1 rcd.Move 3 k = rcd!time_balance rcd.MoveLast l = rcd!time_balance h = DateDiff("m", k, l) MsgBox (h) rcd.MoveNext Loop exit1: End Sub ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 11:31:35 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
to paparome: Если не секрет сколько тебе лет и где работаешь или учишься, просто я смотрю из форума не вылезаешь. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 11:33:05 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
Progato paparome: Если не секрет сколько тебе лет и где работаешь или учишься, просто я смотрю из форума не вылезаешь. 26. Работаю. На работе уже 3 месяца почти нечего делать, так 1-2 часас в день, что-нить подправить. Вот и развлекаюсь тут :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 11:35:07 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
to paparome: Не поверишь у меня всё тоже самое, только мне 24, Прямо родственные души!!! Во блин, как я проинтуичил. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 11:55:08 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
Progato paparome: Не поверишь у меня всё тоже самое, только мне 24, Прямо родственные души!!! Во блин, как я проинтуичил. Телепат :)) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 11:57:37 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
Хотя нет, иногда, базы всякие пишу, время убиваю. А так хочется Real job, but i do what i do, and nobody can't change that. O my god!!! Soon I'll be insain (читать как сумашедший). ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 24.06.2004, 12:00:50 |
|
||
|
Работа с датами
|
|||
|---|---|---|---|
|
#18+
Во блин, приходится возращаться к предыдущему, Datediff не подходит, т.к. необходимо вернуть присутствие задачи как в первом, так и во втором месяце, т.е. число два. Уже проблематичнее, подскажите как выбраться из этой ситуации. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 30.06.2004, 13:09:34 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32575143&tid=1673521]: |
0ms |
get settings: |
5ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
182ms |
get topic data: |
8ms |
get forum data: |
2ms |
get page messages: |
53ms |
get tp. blocked users: |
1ms |
| others: | 185ms |
| total: | 457ms |

| 0 / 0 |
