powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Работа с датами
19 сообщений из 19, страница 1 из 1
Работа с датами
    #32573923
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть две даты начала работы и конца работы, есть ли встроенная функция подсчитывающая количество месяцев на работу, поделитесь?
...
Рейтинг: 0 / 0
Работа с датами
    #32573939
Фотография Shark
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А нафиг она?
Year(MyDate1)*12+Month(MyDate1)-Year(MyDate2)*12-Month(MyDate2)
...
Рейтинг: 0 / 0
Работа с датами
    #32573942
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
DateDiff - не то?
...
Рейтинг: 0 / 0
Работа с датами
    #32573951
ищ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
прога
сначала опеделись, что такое месяц:30 или 31 или 28 или 29 дней
...
Рейтинг: 0 / 0
Работа с датами
    #32573957
ищ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
если исп. datediff , то возвращает количество переходов из одного месяца в другой
...
Рейтинг: 0 / 0
Работа с датами
    #32573980
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
to paparome:
Я тебя обожаю. (за телепатию)
...
Рейтинг: 0 / 0
Работа с датами
    #32573983
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ищесли исп. datediff , то возвращает количество переходов из одного месяца в другой

Year(MyDate1)*12+Month(MyDate1)-Year(MyDate2)*12-Month(MyDate2)
та же фигня :)
...
Рейтинг: 0 / 0
Работа с датами
    #32574036
(c)VIG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторта же фигня :)
Но зато в три раза длинее :)
...
Рейтинг: 0 / 0
Работа с датами
    #32575143
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не работает, выдаёт ошибку, помогите

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
...
Рейтинг: 0 / 0
Работа с датами
    #32575149
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
" & k & " - это что за бред сумасшедшего?
Вы всегда так переменные в функции передаете?
просто k написать не судьба?
...
Рейтинг: 0 / 0
Работа с датами
    #32575159
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всё исправил
Туплю с утра.
код

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
...
Рейтинг: 0 / 0
Работа с датами
    #32575163
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
to paparome:
Если не секрет сколько тебе лет и где работаешь или учишься,
просто я смотрю из форума не вылезаешь.
...
Рейтинг: 0 / 0
Работа с датами
    #32575167
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Progato paparome:
Если не секрет сколько тебе лет и где работаешь или учишься,
просто я смотрю из форума не вылезаешь.

26.
Работаю.
На работе уже 3 месяца почти нечего делать, так 1-2 часас в день, что-нить подправить.
Вот и развлекаюсь тут :)
...
Рейтинг: 0 / 0
Работа с датами
    #32575205
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
to paparome:

Не поверишь у меня всё тоже самое, только мне 24,
Прямо родственные души!!!
Во блин, как я проинтуичил.
...
Рейтинг: 0 / 0
Работа с датами
    #32575211
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Progato paparome:

Не поверишь у меня всё тоже самое, только мне 24,
Прямо родственные души!!!
Во блин, как я проинтуичил.

Телепат :))
...
Рейтинг: 0 / 0
Работа с датами
    #32575223
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Хотя нет, иногда, базы всякие пишу, время убиваю.
А так хочется Real job, but i do what i do, and nobody can't change that.
O my god!!! Soon I'll be insain (читать как сумашедший).
...
Рейтинг: 0 / 0
Работа с датами
    #32583152
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Во блин, приходится возращаться к предыдущему,
Datediff не подходит, т.к. необходимо вернуть присутствие задачи как в первом, так и во втором месяце, т.е. число два.
Уже проблематичнее, подскажите как выбраться из этой ситуации.
...
Рейтинг: 0 / 0
Работа с датами
    #32583156
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Прибавит 1
?
...
Рейтинг: 0 / 0
Работа с датами
    #32583157
Proga
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ТОЧНО.
Thank's
...
Рейтинг: 0 / 0
19 сообщений из 19, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Работа с датами
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]