Robby
Держи, но сам не тестировал.
Код: --[[Функция перемещения папки]]
Folder.Move = function(sInFolderPath, sDestFolderPath)
sInFolderPath = String.TrimRight(sInFolderPath, "\\");
sDestFolderPath = String.TrimRight(sDestFolderPath, "\\").."\\"..String.Right(sInFolderPath, String.ReverseFind(sInFolderPath, "\\", false) + 1);
if not Folder.DoesExist(sDestFolderPath) then
Folder.Create(sDestFolderPath);
end
File.Move(sInFolderPath.."\\*.*", sDestFolderPath, true, true, false, true, nil);
end
--************************
local sDir = Dialog.FolderBrowse("Please select a folder:", "AutoPlay\\Docs");
if sDir ~= "CANCEL" then
-- перемещаем папку test с файлами
Folder.Move('C:\\test', sDir);
end
Держи, но сам не тестировал.
Код: --[[Функция перемещения папки]]
Folder.Move = function(sInFolderPath, sDestFolderPath)
sInFolderPath = String.TrimRight(sInFolderPath, "\\");
sDestFolderPath = String.TrimRight(sDestFolderPath, "\\").."\\"..String.Right(sInFolderPath, String.ReverseFind(sInFolderPath, "\\", false) + 1);
if not Folder.DoesExist(sDestFolderPath) then
Folder.Create(sDestFolderPath);
end
File.Move(sInFolderPath.."\\*.*", sDestFolderPath, true, true, false, true, nil);
end
--************************
local sDir = Dialog.FolderBrowse("Please select a folder:", "AutoPlay\\Docs");
if sDir ~= "CANCEL" then
-- перемещаем папку test с файлами
Folder.Move('C:\\test', sDir);
end