Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 2735
Благодарности: 1699

Профиль | Отправить PM | Цитировать


Перед FSO.CopyFile f, (Dir2), True поставить On Error Resume Next
При этом не надо думать о именах файлов
При желании можно выводить куда-нибудь имена нескопированных файлов
If Err.Number <> 0 Then .........

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Отправлено: 11:59, 20-05-2014 | #3