Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Копирование файлов из каталогов и подкаталогов с сохранением структуры подкаталогов

Ответить
Настройки темы
VBS/WSH/JS - Копирование файлов из каталогов и подкаталогов с сохранением структуры подкаталогов

Новый участник


Сообщения: 1
Благодарности: 0

Профиль | Отправить PM | Цитировать


Здравствуйте.
Есть следующая задача:
Копировать все файлы, измененные позже определенной даты, из указанного каталога и его подкаталогов в другой каталог с сохранением структуры подкаталогов.

Накидал на .js следующий код:

Код: Выделить весь код
//var objArgs = WScript.Arguments;
//var Date = objArgs(0);
//var Dir = objArgs(1);
var Dir = "C:\\test"
var Date = 2;
var Mass = new Array();
Mass += AllFolders(Dir)
for (var i=0; i < Mass.length; i++)
{
FolderFiles(Mass[i], 3);
}

// ---------------------------------------------------------------------------
function AllFolders(Dir)
{
    var F,Result,Folders;
	Result = new Array(); 
    F=WScript.CreateObject("Scripting.FileSystemObject").GetFolder(Dir);

    Folders = new Enumerator(F.SubFolders);

    for (var i = 0; !Folders.atEnd(); Folders.moveNext(), i++)
    {
       Result[i] = Dir+"\\"+Folders.item().Name;
       Result [i+2] = AllFolders(Dir+"\\"+Folders.item().Name);
    }
	return Result;
}
function FolderFiles(Dir, Date)
{
   var fso,fc,nol;
   if (Dir != nol)
   {
   WScript.Echo(Dir);
   fso = new ActiveXObject("Scripting.FileSystemObject").GetFolder(Dir);
   fc = new Enumerator(fso.files);
   for (; !fc.atEnd(); fc.moveNext())
   {
		//if (fc.item().DateLastModified > Date)
		   fc.item().Copy("C:\\log\fso.Add(Dir)");
		   WScript.Echo(fc.item());

	    //else return;
		
   }
   }
   return 0;
}
Но возникают некоторые проблемы. Во-первых в массиве папок почему-то есть нулевые элементы, проверку на нулевой элемент я сделал, но скрипт все равно отказывается работать.

Отправлено: 23:58, 10-04-2013

 


Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » VBS/WSH/JS - Копирование файлов из каталогов и подкаталогов с сохранением структуры подкаталогов

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
VBS/WSH/JS - [решено] Очистка папки обмена с сохранением подкаталогов ru52 Скриптовые языки администрирования Windows 9 17-01-2015 10:41
CMD/BAT - [решено] Удаление пустых каталогов и подкаталогов через CMD Andzzzz Скриптовые языки администрирования Windows 5 29-08-2013 16:00
CMD/BAT - Копирование только самых новых файлов в папках с сохранением структуры папок hoh Скриптовые языки администрирования Windows 3 03-01-2012 10:22
CMD/BAT - копирование файлов из подкаталогов bojfriend Скриптовые языки администрирования Windows 8 31-08-2011 01:49
CMD/BAT - [решено] Конвертирование файлов с сохранением структуры каталогов Sarge81 Скриптовые языки администрирования Windows 3 17-09-2010 07:12




 
Переход