COM-Объект FileSystemObject

Используем в коде 1С FSO-объект (FileSystemObject), для формирования таблицы файлов и каталогов.


// Прочитать содержимое каталога в таблицу значений ТЗКаталог
//
Функция ЗаполнитьТЗКаталог(каталогИмя)
	
        // создаем com-объект
	FSO = Новый COMОбъект("Scripting.FileSystemObject");
	каталогФайлов = FSO.GetFolder(каталогИмя);  
	
	// для каждого подкаталога SubFolders	
	Для каждого подкаталог Из каталогФайлов.SubFolders Цикл
		
		имяПодкаталога = подкаталог.Name; 
		полныйПутьКаталога =  подкаталог.Path;
		префиксПодкаталога = Лев(имяПодкаталога, 9); 
	
		ЗаписьТЗ = ТЗКаталог.Добавить();
		ЗаписьТЗ["Id"] = ТЗКаталог.Количество();			
		ЗаписьТЗ["ПолныйПутьКаталога"] = полныйПутьКаталога;				
		ЗаписьТЗ["ПрефиксКаталога"] = префиксПодкаталога;	
		ЗаписьТЗ["ИмяКаталога"] = имяПодкаталога;	
		
	КонецЦикла; 
	Возврат Неопределено;
	
КонецФункции




Рекламный блок:

Предлагаем решение Ваших задач 1С.

Внедрение 1С:

Доработка и сопровождение 1С:

Ориентировочная стоимость работ программиста 1С : 500 р. за 1 час работы.

Пишите: j008@j008.ru

Звоните: 8 916 710 83 51 Ольга