0
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
|
|
8
Garykom
гуру
10.11.16
✎
16:38
|
Да блин там простейше же
ИсхСтрока = "#2#LAKISHA TOMBLIN#06.08.1961#F#2#Administrative Clerk#Provides administrative suppo#Hourly#$#l_tomblin@nnl.com# Total #Hourly Staff";
мСтрока = СтрЗаменить(ИсхСтрока, "#", Символы.ПС);
Имя = СтрПолучитьСтроку(мСтрока, 2);
|
|