По теме из базы знаний
Найденные решения
Не знаю такой, наверное, сложность написания связана с тем, что для универсальности придется искать месяца для 100500 языков и еще учитывать, что этот месяц может всплывать в разных местах.
Просто напишите что-то типа (код не проверял, считайте, что это псевдокод! просто идея):
Можете сделать более универсально, чтобы не зависеть от склонения и позволять работать с сокращенными наименованиями месяцев, т.е.
Месяцы = СтрРазделить("янв,фев, мар ...
И Месяцы.Найти(Лев(НРег(пДаты[1]), 3))
Просто напишите что-то типа (код не проверял, считайте, что это псевдокод! просто идея):
пДаты = СтрРазделить(МояДата, " ");
Месяцы = СтрРазделить("январь,февраль,март,апрель,май,июнь,июль,август,сентябрь,октябрь,ноябрь,декабрь", ",");
пДата = Дата(Число(пДаты[0]), Месяцы.Найти(НРег(пДаты[1])), пДаты[2]);
Можете сделать более универсально, чтобы не зависеть от склонения и позволять работать с сокращенными наименованиями месяцев, т.е.
Месяцы = СтрРазделить("янв,фев, мар ...
И Месяцы.Найти(Лев(НРег(пДаты[1]), 3))
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Не знаю такой, наверное, сложность написания связана с тем, что для универсальности придется искать месяца для 100500 языков и еще учитывать, что этот месяц может всплывать в разных местах.
Просто напишите что-то типа (код не проверял, считайте, что это псевдокод! просто идея):
Можете сделать более универсально, чтобы не зависеть от склонения и позволять работать с сокращенными наименованиями месяцев, т.е.
Месяцы = СтрРазделить("янв,фев, мар ...
И Месяцы.Найти(Лев(НРег(пДаты[1]), 3))
Просто напишите что-то типа (код не проверял, считайте, что это псевдокод! просто идея):
пДаты = СтрРазделить(МояДата, " ");
Месяцы = СтрРазделить("январь,февраль,март,апрель,май,июнь,июль,август,сентябрь,октябрь,ноябрь,декабрь", ",");
пДата = Дата(Число(пДаты[0]), Месяцы.Найти(НРег(пДаты[1])), пДаты[2]);
Можете сделать более универсально, чтобы не зависеть от склонения и позволять работать с сокращенными наименованиями месяцев, т.е.
Месяцы = СтрРазделить("янв,фев, мар ...
И Месяцы.Найти(Лев(НРег(пДаты[1]), 3))
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот