7.7 Помогите разобратся с загрузкой *.txt

Тема в разделе "Типовые решения "1С:Предприятие 7.7"", создана пользователем SUnWer, 19 янв 2007.

  1. TopicStarter Overlay
    SUnWer
    Offline

    SUnWer

    Регистрация:
    8 ноя 2006
    Сообщения:
    19
    Симпатии:
    0
    Баллы:
    1
    0015061220062087 ;Абдулин Р.В. ;71 04 135843 ;4483468564848283;;STOP
    0015171113000644 ;Абрамов А.В. ;92 03 945682 ;4483460532546883;;STOP
    0015066145544223 ;Адамчук С.Н. ;71 02 710100 ;4483522652742286;;STOP
    0022006145753172 ;Айбатов Р.Р. ;71 04 209266 ;4483415245179424;;STOP
    0052006123628453 ;Бер В.П. ;71 00 185155 ;4483569580937231;;STOP

    вот есть такая вот структура...
    Чета я совсем отупел, не как не могу получить номер после третьих ";"...
    помогите люди добрые!!!
  2. Amishechka
    Offline

    Amishechka Опытный в 1С

    Регистрация:
    8 сен 2006
    Сообщения:
    361
    Симпатии:
    1
    Баллы:
    26
    попробуй так:
    Стр=СтрЗаменить(Текст.ПолучитьСтроку(НомерСтроки),";",",");
    //меняем в строке ";" на ","
    Список=СоздатьОбъект("СписокЗначений");
    Список.ИзСтрокиСРазделителями(Стр);
    //загоняем это в список значений
    ТретийПараметр=СокрЛП(Список.ПолучитьЗначение(3));

    //может и получится

Поделиться этой страницей