Описание работы обработок 1С

Главная » 2015 » Январь » 13


Процедура КнопкаВыполнитьНажатие(Кнопка)
    МассивФайлов = НайтиФайлы(ПутьКФайлам, "*.txt");
    Для Каждого ЭлементМассива из МассивФайлов Цикл
        Файл = Новый ЧтениеТекста(ЭлементМассива.ПолноеИмя);
        ВесьФайлОднойСтрокой = Файл.Прочитать();
        Если Найти(ВесьФайлОднойСтрокой, ИскомаяСтрока) > 0 Тогда
            Сообщить(ЭлементМассива.Имя);
        КонецЕсли;
        Файл.Закрыть();
    КонецЦикла;
КонецПроцедуры

 

Просмотров: 203 | Добавил: kevseev0 | Дата: 13.01.2015

Язык запросов "1С:Предприятия 8" - Е.Ю. Хрусталева
Профессиональная разработка в системе 1С:Предприятие 8".

Просмотров: 179 | Добавил: kevseev0 | Дата: 13.01.2015

Вторник, 22.07.2025, 20:10
Приветствую Вас Гость

Вход на сайт

Поиск

Календарь

«  Январь 2015  »
Пн Вт Ср Чт Пт Сб Вс
   1234
567891011
12131415161718
19202122232425
262728293031

Архив записей

Наш опрос

Оцените мой сайт
Всего ответов: 2

Друзья сайта

  • Официальный блог
  • Сообщество uCoz
  • FAQ по системе
  • Инструкции для uCoz
  • Статистика


    Онлайн всего: 1
    Гостей: 1
    Пользователей: 0