[OSArev]

SendMessage, извини, был не внимателен, navigator19 - запутал, то ему то, то ему это, нет, чтобы самому подумать. Да, конечно, твоё решение, тоже правильно.
А на счёт DatePart - так это он просто под руку попался, но ведь тоже работает?
И за один ноль, спасибо.