Total Commander Forum Index Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB
 
 RulesRules   SearchSearch   FAQFAQ   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Single Post  Topic: Создание папки с текущей датой, временем и текстовым файлом 
Author Message
Flasher



PostPosted: Fri Jun 17, 2016 19:42    Post subject: Reply with quote

sibirnik
В этом скрипте заменить 5 снизу строку на:
Code:
Folder = FSO.BuildPath(WSH.CurrentDirectory, Replace(Now, ":", "-")) & "\"
If Not FSO.FolderExists(Folder) Then FSO.CreateFolder Folder
F = Folder & FSO.GetBaseName(Name) : FN = F & "." & Ext
Чтобы не было перехода, последнюю закомментировать или удалить.
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой.


Last edited by Flasher on Fri Jun 17, 2016 20:22; edited 1 time in total
View user's profile Send private message


Powered by phpBB © 2001, 2005 phpBB Group