Имя: Пароль:
1C
1С v8
Пишу выгрузку для сайта. Почему не создается файл в конце?
,
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
Зачем?
>> сообщить(выборка.Товар);
>> &НаСервере