|
|
Вопрос по FileSystemObject |
☑ |
|
0
Armando
12.04.08
✎
15:12
|
ФСО = СоздатьОбъект("Scripting.FileSystemObject");
ПапкаСФайлами = ФСО.GetFolder(СокрЛП(Путь));
Файлы = ПапкаСФайлами.Files;
Для Сч = 1 По Файлы.Count Цикл
ИмяФайла = Файлы.Item(Сч-1).Name; // здесь вылетает
КонецЦикла;
что не так?
|
|
|
1
smaharbA
12.04.08
✎
15:13
|
это коллекция и итемой у нее имя
|
|
|
2
Armando
12.04.08
✎
15:15
|
как писать?
|
|
|
3
smaharbA
12.04.08
✎
15:24
|
(2) никак или new Enumerator
|
|
|
4
Armando
12.04.08
✎
15:30
|
въехал. msdn зрю.
|
|
|
5
smaharbA
12.04.08
✎
15:32
|
ок
//*******************************************
Процедура Сформировать()
Скрипт=СоздатьОбъект("MSScriptControl.ScriptControl");
Скрипт.language="javascript";
ФСО=СоздатьОбъект("scripting.filesystemobject");
Папка=ФСО.GetFolder(КаталогИБ());
Файлы=Папка.Files;
Скрипт.AddObject("Файлы",Файлы);
Перечисленные=Скрипт.Eval("new Enumerator(Файлы)");
Пока Перечисленные.atEnd(0)=0 Цикл
Сообщить(Перечисленные.item(0).Path);
Перечисленные.moveNext(0);
КонецЦикла;
КонецПроцедуры
но зачем несовсем понятно ? есть ведь родной ФС и причем их может быть не один
|
|
|
6
Armando
12.04.08
✎
15:47
|
просто с первого раза не понял, как используя родной ФС поочередно получить все имена и пути файлов
|
|
|
7
Armando
12.04.08
✎
15:49
|
(5) спасибо за код
|
|