перенос содержимого из одной папки в другую (не копирование!)

[zalola181]

Версия AutoIt: 3.3.14.2

Описание: скрипт

Примечания: перенос данных

Что-то простое действо не могу найти решение - нужно из одной папки все ее содержимое перенести в другую - поддержите умением - как это воплотить - копирование не нужно именно перенести

 

[Dima1337]

HotKeySet("{Esc}","_Exit")
HotKeySet("{F4}","_Move")

Global $move

While 1
	Sleep(100)
WEnd

Func _Move()
	$move = Not $move
	If $move Then
		DirCopy (@DesktopDir & "\Старая папка", @DesktopDir & "\Новая папка",1)
		DirRemove(@DesktopDir & "\Старая папка",1)
		DirCreate(@DesktopDir & "\Старая папка")
	EndIf
EndFunc

Func _Exit()
	Exit
EndFunc

 

[zalola181]

в данном случае перенос целой папки, а ни ее содержимого, а нужно содержимое вытащить и положить в другую папку - папки в разных местах и путь к каждой разный

 

[Dima1337]

Собственно не пойму что вам нужно.
"в данном случае перенос целой папки, а ни ее содержимого"
Этот скрипт переносит ВСЕ файлы из папки исходник на рабочем столе в папку бэкап на диске С
После чего удаляет папку исходник с файлами и создает заного пустую.
Сформулируйте свой вопрос четче :stars:

HotKeySet("{Esc}","_Exit")
HotKeySet("{F4}","_Move")

Global $move

While 1
    Sleep(100)
WEnd

Func _Move()
    $move = Not $move
    If $move Then
        DirCopy (@DesktopDir & "\Папка исходник", "C:\Папка Бэкап",1)
        DirRemove(@DesktopDir & "\Папка исходник",1)
        DirCreate(@DesktopDir & "\Папка исходник")
		ControlSend('','','','{F5}')
    EndIf
EndFunc

Func _Exit()
    Exit
EndFunc