У меня есть этот код, который будет копировать файлы на основе имени файла, по имени файла означает получение предыдущей даты текущей даты, но моя проблема здесь - первый день месяца.
FSO.CopyFile "D:\Input\rep_*" & Year(Now) & Right("0" & Month(Now), 2) & Right("0" & Day(Now - 1), 2) & ".txt", "D:\Output\"
Моя функция даты: Год (сейчас) и справа ("0" и месяц (сейчас), 2) и справа ("0" и день (сейчас - 1), 2)
И, как видите, функция День получит предыдущий день, так как он минус 1. День(Сейчас - 1)
Моя проблема - первый день месяца. Например, сегодня 1 августа 2016 г., и на основе приведенной выше функции даты будет найдено 160831, а не 160731. Я также обеспокоен тем, что некоторые месяцы заканчиваются на 30 и 31.
Есть ли способ получить предыдущую дату с помощью VBScript динамически? Заранее спасибо.
y = DateAdd("d",1,Date())
наy = DateAdd("d",-1,Date())
, чтобы получить предыдущий день. Спасибо за ответ, работает. 01.08.2016