Копирование папки на флешку - 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