[vb6] Поиск и копирование каталогов

15.02.2011, 14:33. Показов 2022. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Всем доброго времени суток!)

Проблема вот в чём:
Можно ли сделать поиск каталога и всё от туда скопировать, кроме двух отдельных папок.
А поиск усуществить по поиску отрывка из названия, т.е. допустим путь известен к папке, а название папки не известна, если только конец названия, например:
C:\Folder\qwe\***123\
***- Вот эти символы неизвестны.

Или просто перейти в папку, и войти в папку с этим неизвестным названием.

и допустим в этой папке ***123 лежат файлы и папки, например:
папки: folder1, folder2, folder3
файлы: 1.txt, 2.txt, 3.txt

И надо всё скопировать в каталог C:\FOLDERS, все файлы и папку folder3...

Я ищу папку и копирую её таким образом:

Visual Basic
1
2
3
4
5
6
Set objFSO = CreateObject("Scripting.FileSystemObject")
If Not objFSO.FolderExists(App.Path & "C:\Folder\" & myYear) Then
Const OverWriteFiles = True
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.CopyFolder "C:\Folder", "C:\Folders", OverWriteFiles
End If

А вот как мне сделать как надо, ума не приложу, да и если честно, даже не знаю, возможно ли это)))

Заранее благодарен за любую помощь)

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

15.02.2011, 14:33

Ответы с готовыми решениями:

Копирование всех каталогов с одним заданным именем из множества неизвестных каталогов
Всем добрый день. Сложилась необходимость создания бекапа определенной папки в пользовательских папках на терминальном сервере. Итак,...

Курсач горит,нужно организовать удаление каталогов и копирование каталогов
Народ кто нито помогите с курсачем нужно что бы каталоги удалял с запросом и каталоги перемещал,а то не получается(( очень надо

Копирование каталогов
Доброго времени суток. Как можно реализовать копирование каталогов (пустого/с файлами/с подпапками)? Перемещение по каталогам осуществляю...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

15.02.2011, 14:33

Помогаю со студенческими работами здесь

Копирование каталогов
Всем привет. Стоит задача, скопировать из источника A на источник B каталог. Но скопировать требуется самый новый каталог по пути. ...

Копирование файлов и каталогов
у МЕНЯ ТАКОЙ ВОПРОС а Можно ли Копирование файлы и каталоги написанной прогой на Ассемблере! Какими функциями выполняется копирование? ...

Копирование их под каталогов.
Доброе утро! У меня есть не большая программа по нахождению на диске С текстовые файлы. ...

Копирование каталогов и файлов
Народ такая проблема: Надо сравнить каталогов и файлов между дисками d:\ и I:\ и копировать из d\ в I:\ только те которые ...

Копирование каталогов средствами Delphi
Друзья, кто нибудь занимался подобным. Я делаю программу чтобы БД копировала. Вопрос встал как это сделать в делфи. Пробовал сделать путем...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Опции темы

Новые блоги и статьи Все статьи Все блоги /
Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/

Наверх