Flasher
|
 Posted: Thu Aug 29, 2013 05:18 Post subject: |
 |
|
Рамирес_Такт
Если в панелях нет файлов с другими расширениями, то в этом скрипте меняем
| Code: | With CreateObject("Scripting.FileSystemObject")
Set P = .GetFolder(P) : Set T = .GetFolder(T)
End With |
на | Code: | Set FSO = CreateObject("Scripting.FileSystemObject")
Set P = FSO.GetFolder(P) : Set T = FSO.GetFolder(T) |
и массово F.Name на FSO.GetBaseName(F)
_________________
Автору сборки TC Image (Andrey_A) настоятельно рекомендуется не распространять на иных ресурсах любую предоставленную мной где-либо техническую информацию по автоматизации и оптимизации в работе с ТС и системой. |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
