Ветеран
Сообщения: 2733
Благодарности: 1698
|
Профиль
|
Отправить PM
| Цитировать
Перед FSO.CopyFile f, (Dir2), True поставить On Error Resume Next
При этом не надо думать о именах файлов
При желании можно выводить куда-нибудь имена нескопированных файлов
If Err.Number <> 0 Then .........
|
|
-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.
Отправлено: 11:59, 20-05-2014
| #3
|
