Flasher

|
Posted: Sat Dec 06, 2014 18:11 Post subject: |
|
|
NAA wrote: | Честно говоря, не представляю, как это можно сделать простым способом. | Используя те же скрипты замены (1, 2, 3, 4, 5).
Что касается выделения файлов, то меняем 20-27 строки на эти:
Code: | F = Trim(.ReadLine)
If F <> "" And FSO.FileExists(F) And StrComp(FSO.GetExtensionName(F),Ex) = 0 Then _
FSO.CopyFile File, FSO.GetParentFolderName(F) & "\" & FSO.GetBaseName(F) & "." & Ext, 0 |
_________________ Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|