| Вопрос: Работа с папками и файлами | Добавлено: 14.05.08 10:15 |
Автор вопроса:  Иван
|
|
Доброе время суток!
Подскажите пожалуйста, какие есть варианты в VB6 копирования всех файлов из папки1 в папку2, учитывая, что папка2 не пустая. |
| Ответы | Всего ответов: 6 |
|
Номер ответа: 1 Автор ответа:  J. Smith ICQ: ненавижу Вопросов: 40 Ответов: 477 |
Web-сайт: Профиль | | #1 | Добавлено: 14.05.08 10:40 |
|
Варианты:
API FSO CMD VB Самый топорный, дать команду CMD: Shell "cmd /c Copy /Y папка_источник\*.* папка_получатель\", vbHide |
||
|
Номер ответа: 2 Автор ответа: J. SmithICQ: ненавижу Вопросов: 40 Ответов: 477 |
Web-сайт: Профиль | | #2 | Добавлено: 14.05.08 10:42 |
| Недавно был такой вопрос http://vbnet.ru/forum/show.aspx?id=164487 | ||
|
Номер ответа: 3 Автор ответа: Иван Вопросов: 14 Ответов: 16 |
Профиль | | #3 | Добавлено: 14.05.08 11:21 |
| Читал, что есть готовая процедура в FSO. Подскажите пожалуйста. | ||
|
Номер ответа: 4 Автор ответа: J. SmithICQ: ненавижу Вопросов: 40 Ответов: 477 |
Web-сайт: Профиль | | #4 | Добавлено: 14.05.08 11:47 |
 правильный выбор
Dim FSO As Object Set FSO = CreateObject("Scripting.FileSystemObject" 
FSO.CopyFolder "C:\Folder1", "C:\Folder2" Set FSO = Nothing |
||
|
Номер ответа: 5 Автор ответа: J. SmithICQ: ненавижу Вопросов: 40 Ответов: 477 |
Web-сайт: Профиль | | #5 | Добавлено: 14.05.08 11:59 |
|
а если
FSO.CopyFolder "C:\Folder1", "C:\Folder2", False то существующие в C:\Folder2 файлы небудут переписаны и при совпадении имен происходит ошибка 58 File already exists по умолчанию там True, разрешена перезапись существующих файлов |
||
|
Номер ответа: 6 Автор ответа: ИванВопросов: 14 Ответов: 16 |
Профиль | | #6 | Добавлено: 14.05.08 12:06 |
| Большое Вам спасибо, теперь все ясно! | ||
Страница: 1 |