ZloyRafa 10.11.16 - 16:31 | Имеется справочник с подобными реквизитами, строка с разделителем, а вот разобрать не пойму как, подкиньте для пример, если есть варианты.
Обработка
Процедура ЗагрузкаИзTXTФайла()
//Создадим новый объект типа "Текстовый документ"
Текст = Новый ТекстовыйДокумент();
Текст.Прочитать("C:\Users\user\Documents\1c\Конкурс\1.txt", КодировкаТекста.ANSI);
Для НомерСтроки = 1 по Текст.КоличествоСтрок() Цикл
Строка = Текст.ПолучитьСтроку(НомерСтроки);
Сообщить(Строка);
Позиция = Найти (Строка,"#");
Спр=Справочники.БСК.СоздатьЭлемент();
Спр.Код = Сред(Строка,1,Позиция-1)+Прав(Строка,Позиция);
//Спр.Наименование = Сред (Строка,3, Позиция+3);
//Спр.DateOfBirth = Сред (Строка, Позиция-1);
//Спр.Gender = Сред (Строка, Позиция+3);
//Спр.PositionIDPositionName = Сред (Строка, Позиция+4);
//Спр.PositionDescription = Сред (Строка, Позиция+5);
//Спр.PayPeriod = Сред (Строка, Позиция+6);
//Спр.PayRate = Сред (Строка, Позиция+7);
//Спр.EmailAddress = Сред (Строка, Позиция+8);
Спр.SummaryInformatio = Сред(Строка,11,Позиция-1);
Спр.Записать();
КонецЦикла;
Конецпроцедуры
Текстовик
#2#LAKISHA TOMBLIN#06.08.1961#F#2#Administrative Clerk#Provides administrative suppo#Hourly#$#l_tomblin@nnl.com# Total #Hourly Staff |
Ёпрст 2 - 10.11.16 - 16:32 | или, СтрРазделить(<Строка>, <Разделитель>, <ВключатьПустые>)
|