madjahed86
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Добрый день. Может кто поможет. Нужно добавить обработку вложенных папок при копировании из папок "ssfDESKTOP", "ssfPERSONAL", "%APPDATA%\\Microsoft\\Windows\\Libraries\\Documents.library-ms\\", которые указаны в переменной specialFolders
Код:
WshShell = WScript.CreateObject("WScript.Shell");
with(WshShell){
var list1= ExpandEnvironmentStrings("%APPDATA%") + '\\Microsoft\\Windows\\Libraries\\Documents.library-ms\\';
}
var ssfDESKTOP = 0x00, ssfPERSONAL = 0x05, SHCONTF_NONFOLDERS = 0x00040, SHCONTF_INCLUDEHIDDEN = 0x00080,
shell = new ActiveXObject('Shell.Application'),
specialFolders = [ssfDESKTOP, ssfPERSONAL, list1],
currentFolder = shell.NameSpace(WScript.ScriptFullName.replace(/[^\/\\]+$/, '')),
backupFolder = 'Statistika\\Недельная\\',
items;
currentFolder.NewFolder(backupFolder);
currentFolder = shell.NameSpace(currentFolder.parseName(backupFolder));
for(var i in specialFolders){
items = shell.NameSpace(specialFolders[i]).Items();
items.filter(SHCONTF_NONFOLDERS || SHCONTF_INCLUDEHIDDEN,'*.bak, *.old, *.ini');
currentFolder.CopyHere(items,24);
}
|
Если проще реализовать на vbs тоже вариант. С помощью robocopy не удалось - не понимает путь "%APPDATA%\\Microsoft\\Windows\\Libraries\\Documents.library-ms\\" |
Всего записей: 2 | Зарегистр. 24-11-2017 | Отправлено: 08:42 26-11-2017 | Исправлено: madjahed86, 08:44 26-11-2017 |
|
