Копирование/перемещение папки - VB

Узнай цену своей работы

Формулировка задачи:

Спасибо большое Вам за то, что помогаете мне, но у меня ещё один небольшой вопрос: каким образом можно скопировать/переместить полностью одну папку в другую?

Решение задачи: «Копирование/перемещение папки»

textual
Листинг программы
Sub a()
    oldFolder = "D:\ГёГ*Г°Г*"
    newFolder = "C:\ГёГ*Г°Г*"
    
    Call Shell("cmd /c mkdir " + newFolder)
    Call Shell("cmd /c xcopy " + oldFolder + " " + newFolder + "/e", 1)
End Sub

ИИ для рефератов и докладов


  • Экспорт Word по ГОСТу
  • Минимум 80% уникальности текста
  • Поиск релевантных источников в интернете
  • Готовый документ за 2 минуты

Оцени полезность:

14   голосов , оценка 4.071 из 5
Похожие ответы