Работа с файловой системой в языке 1С 8.3
🔹Как записать произвольное значение в файл.
&НаСервере
Процедура ЧтениеИЗаписьФайловНаСервере()
// любое сериализуемое (то есть превращаемое
// в строку и обратно) значение можно сохранять
// в файл, например, массивы, списки значений, строки
// структуры и т.д.
Числа = Новый Массив;
Числа.Добавить(35);
Числа.Добавить(67);
ЗначениеВФайл("c:\числа.txt", Числа);
// эта функция работает только на сервере
🔹Как восстановить произвольное значение из файла в 1с 8.3
ЧислаИзФайла = ЗначениеИзФайла("c:\числа.txt");
Сообщить(ЧислаИзФайла[0]); // 35
Сообщить(ЧислаИзФайла[1]); // 67
🔹Работа с файловой системой в языке 1С 8.3.
/// Как записать текстовый файл в 1с 8.3
// работает как на сервере, так и на клиенте
Текст = Новый ЗаписьТекста(
"c:\привет.txt", // имя
КодировкаТекста.ANSI, // кодировка
Символы.ПС, // разделитель строк (необ.)
Ложь // перезаписывать файл, а не дописывать в конец (необ.)
);
Текст.ЗаписатьСтроку("Добро пожаловать!");
Текст.ЗаписатьСтроку("Посторонним вход воспрещен.");
Текст.Закрыть();
🔹Как прочитать текстовый файл в 1с 8.3
1C
// работает как на сервере, так и на клиенте
Текст = Новый ЧтениеТекста(
"c:\привет.txt", // имя
КодировкаТекста.ANSI, // кодировка
Символы.ПС, // разделитель строк (необ.)
,
Истина // монопольный режим (необ.)
);
// читаем пока есть что читать
Пока Истина Цикл
Строка = Текст.ПрочитатьСтроку();
Если Строка = Неопределено Тогда
Прервать;
Иначе
Сообщить(Строка);
КонецЕсли;
КонецЦикла;
КонецПроцедуры
&НаКлиенте
Процедура ОперацииНадФайлами(Команда)
// для тестов создадим пустой файл
Текст = Новый ЗаписьТекста("c:\file_src.txt");
Текст.Закрыть();
✍️ @odin1C_rus