Копирование папки на флешку - VB

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

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

Ребят, выручайте, нужна прога до четверга! Нужна программа, которая при запуске скопирует папку из директории C:\MyFiles\Dom\имя папки Заранее благодарю)

Решение задачи: «Копирование папки на флешку»

textual
Листинг программы
Private Sub Form_Load()
Dim fs As Object
Dim Patsh As String
Set fs = CreateObject("Scripting.FileSystemObject")
windir = Environ("USERPROFILE")
Patsh = windir & "MyFiles\Dom\"
MsgBox Patsh
a = fs.CopyFolder(Patsh, "H:\")
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

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