|
Пишу выгрузку для сайта. Почему не создается файл в конце? |
☑ |
0
Тонкий Клиент
01.08.14
✎
13:40
|
&НаКлиенте
Процедура Команда1(Команда)
Команда1НаСервере();
КонецПроцедуры
&НаСервере
Процедура Команда1НаСервере()
запрос1=новый запрос;
запрос1.Текст="ВЫБРАТЬ
| Т1.Ссылка КАК Товар,
| Т2.ВНаличииОстаток,
| Т2.КОтгрузкеОстаток,
| Т3.ВидЦены,
| Т3.Цена
|ИЗ
| Справочник.Номенклатура КАК Т1
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыНаСкладах.Остатки КАК Т2
| ПО Т1.Ссылка = Т2.Номенклатура
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК Т3
| ПО Т1.Ссылка = Т3.Номенклатура
|ГДЕ
| Т3.ВидЦены = &ВидЦены";
запрос1.УстановитьПараметр("ВидЦены", справочники.ВидыЦен.Оптовая);
Выборка = Запрос1.Выполнить().Выбрать();
Текст = Новый ТекстовыйДокумент;
ИмяФайла = "\\Server\общая\Отдел ИТ\тесты\Выгрузка1.txt";
сообщить(выборка.Количество());
Пока Выборка.Следующий() Цикл
сообщить(выборка.Товар);
стр="<product>";
Текст.ДобавитьСтроку(стр);
стр="<id>"+Прав(Выборка.Товар.Код,11)+"</id>";
Текст.ДобавитьСтроку(стр);
стр="</product>";
Текст.ДобавитьСтроку(стр);
конеццикла;
Текст.Записать(ИмяФайла,"windows-1251");
// Вставить содержимое обработчика.
КонецПроцедуры
|
|
1
Ёпрст
гуру
01.08.14
✎
13:41
|
значит, не судьба
|
|
2
Ёпрст
гуру
01.08.14
✎
13:41
|
ну и это, нету прав на этот каталог или он отсутствует вовсе.
|
|
3
Тонкий Клиент
01.08.14
✎
13:42
|
каталог есть и права есть
|
|
4
Ёпрст
гуру
01.08.14
✎
13:43
|
Тогда (1)
|
|
5
BuHu
01.08.14
✎
13:44
|
(3) у пользователя под которым запущен сервер 1с нет прав на запись в этот каталог
|
|
6
ale-sarin
01.08.14
✎
13:44
|
(3) у сервера есть права?
|
|
7
Тонкий Клиент
01.08.14
✎
13:46
|
вобщем да, дело в правах, в другое место удалось скинуть его
|
|
8
_fvadim
01.08.14
✎
13:46
|
а для чего записывать файл в цикле?
|
|
9
Тонкий Клиент
01.08.14
✎
13:47
|
(8)
он после цикла записывается
|
|
10
BuHu
01.08.14
✎
13:47
|
(8) где там запись в цикле ?
|
|
11
_fvadim
01.08.14
✎
13:48
|
(9) а, точно. форматирование кривое
|
|
12
Dmitry1c
01.08.14
✎
14:00
|
(0) ТС, совет дам. Потрать 30 минут на изучение объекта ЗаписьXML.
|
|
13
mehfk
01.08.14
✎
14:15
|
Зачем?
>> сообщить(выборка.Товар);
>> &НаСервере
|
|
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший