Имя: Пароль:
1C
1С v8
как Создать txt с Апострофами
0 Popkorm
 
17.11.11
15:25
Как проставить Апострофи,так не работает:        
Текст = Новый ЗаписьТекста(Путь, КодировкаТекста.ANSI);
       Для Каждого Стр Из СтрДЗ.Строки Цикл
           Период = Сред(Стр.Период,1,10);
            СтрокТ= СокрЛП(Строка(Стр.Номенклатура))+',';
           СтрокТ=+','+','+','+','+СокрЛП(Строка(Стр.НачальныйОстаток))+','+СокрЛП(Строка(Стр.Номенклатура))+','+','+СокрЛП(Строка(Стр.ISBN))+','+СокрЛП(Строка(Стр.EAN13))+','+','+; //+СокрЛП(Строка(Период))+',+',';
           Текст.ЗаписатьСтроку(СтрокТ);
       КонецЦикла;
1 Popkorm
 
17.11.11
15:29
вот такой результат нужен:
http://clip2net.com/s/1kdVP
2 andrewks
 
17.11.11
15:29
"'"
3 sergeante
 
17.11.11
15:38
чо?