Версия для печати темы

Нажмите сюда для просмотра этой темы в оригинальном формате

WinCity.Ru _ Программирование _ Ошибка при выполнении JScript

Автор: olegber Четверг, 08 Июня 2006, 11:05

Появляется ошибка "Разрешение отклонено;код 800A0046" при выполнении следующего кода:

var FSO,WshShell,MyDate,SourcePath,DestinationPath,SourceFolder,SourceFiles,DateCrea
ted;
arrayDC = new Array();
//создаем необходимые для работы скрипта объекты
FSO=WScript.CreateObject("Scripting.FileSystemObject");
WshShell=WScript.CreateObject("WScript.Shell");
//Заданая дата
MyDate = new Date (2006,10,10); //месяцы от 0 до 11
//Путь к каталогам
SourcePath="C:\\1";
DestinationPath="C:\\2";
//Получаем объект-папка
SourceFolder=FSO.GetFolder(SourcePath);
//Получим колекцию файлов в заданом каталоге
SourceFiles = new Enumerator(SourceFolder.Files);
//перебираем и копируем
for (;!SourceFiles.atEnd(); SourceFiles.moveNext())
{
DateCreated = new Date(SourceFiles.item().DateCreated);
if (DateCreated<=MyDate)
{
//WScript.Echo(DateCreated.toLocaleDateString() +" "+ MyDate.toLocaleDateString());
SourceFiles.item().Copy(DestinationPath);
}
}

Что такое может быть? Уровень безопасности минимум, WinXPSP2, антивир NOD32(отключал-не помогает), права администратора.

Автор: Админ Четверг, 08 Июня 2006, 17:04

Пуск -> выполнить -> dcomcnfg -> Службы компонентов -> Компьютеры -> Мой компьютер -> (пр.кнопка) Свойства -> Свойства по умолчанию -> Проверить галку на "Разрешить использовать DCOM на этом компьютере".

и поробовать добавить завершающий слеш в пути к папкам

SourcePath="C:\\1\\";
DestinationPath="C:\\2\\";

Автор: olegber Вторник, 13 Июня 2006, 13:09

Спасибо за подсказку.Действительно не хватало завершающего слэша

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)