Переименовать файл вчерашним днем - VB

Узнай цену своей работы

Формулировка задачи:

PS спасибо заранее

Решение задачи: «Переименовать файл вчерашним днем»

textual
Листинг программы 
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile("x:\foldertree\filename.ext")
f.Name = CStr(DateAdd("d",-1,Date)) & ".ext"
Set f = Nothing
Set fso = Nothing

ИИ поможет Вам:

  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

11   голосов , оценка 4.091 из 5