Всем привет!
Возникла проблема при изменении записи в таблице sql. Запрос select к базе на сервере отрабатывает без ошибок,но вот update не работает,хотя в pgadmin на localhost та же конструкция работает. Может кто-что подскажет?Может есть какие-нибудь права на чтение-запись?


перем НаборЗаписей, ИдБаланса;
Процедура КнопкаВыполнитьНажатие(Кнопка)
    Connection = Новый COMОбъект("ADODB.CONNECTION");
    Connection.ConnectionString = "Driver={PostgreSQL ODBC Driver(Unicode)}; Server="+"172.21.3.251"+";Port=" +
    "5432"+";Database="+"set"+";Uid="+"postgres"+";Pwd="+"00PaSsMSSQL!"+";STMT="+"utf8";        
    Попытка            
        //Состояние("Подключение к базе PostgreSQL...");
        Connection.open();            
        //Сообщить("База PostgreSQL подключена");
    Исключение            
        Сообщить("Не могу подключиться к базе PostgreSQL ");
    КонецПопытки;  
    
    
    НаборЗаписей = Новый ComObject("ADODB.RecordSet");
    Команда = Новый COMОбъект("ADODB.Command");
    Попытка    
        Команда.ActiveConnection = Connection;
        ТекстЗапроса=
        "SELECT
        |cards_bonusaccounts_balance.bonusaccounts_id
        |FROM
        | public.cards_bonusaccounts_balance,
        |public.card_cards,
        | public.card_internalcard_bonusaccount
        |WHERE
        |cards_bonusaccounts_balance.bonusaccounts_id = card_internalcard_bonusaccount.bonusaccountid AND
        |card_internalcard_bonusaccount.cardid = card_cards.id AND
        |cards_bonusaccounts_balance.balancetype = 0 and
        |card_cards.numberfield='"+НомерКарты+"'";
        
        Команда.CommandText =ТекстЗапроса;
        НаборЗаписей = Команда.Execute();
        ИдБаланса=НаборЗаписей.Fields(0).Value;

            Исключение    
        Сообщить("Нет данных.");
                Возврат;
    КонецПопытки;
          Сообщить(ИдБаланса);
          
          
          
Команда = Новый COMОбъект("ADODB.Command");
    Попытка    
Команда.ActiveConnection = Connection;
ТекстЗапроса =
"UPDATE cards_bonusaccounts_balance
|set ammount=0
|WHERE cards_bonusaccounts_balance.balancetype = 0 and
|cards_bonusaccounts_balance.bonusaccounts_id = '"+Формат(ИдБаланса,"ЧГ=0")+"'";
Команда.Execute(ТекстЗапроса);
Исключение
Сообщить("Не получилось");
КонецПопытки;

КонецПроцедуры

id разве строка?

(1) Это формат числа

https://drive.google.com/file/d/0B41P7U88tnheM19IX05hSHpoQVk/view?usp=sharing

(0) А какой ошибкой матерится? Сам текст запроса, который отдается в команду, можешь привести?

(4) + ошибка - это не та, которая "Не получилось", а реальная, которую сервер сообщает.

(5) А как узнать? Я не в куре...Где-то в логах видно?

(6) ОписаниеОшибки()

да просто попытку убрать

{Форма.Форма.Форма(52)}: Ошибка при вызове метода контекста (Execute): Произошла исключительная ситуация (Microsoft OLE DB Provider for ODBC Drivers): Не был задан текст команды для объекта команды.

А если так
Команда.CommandText =ТекстЗапроса;
Команда.Execute()

Команда.CommandText =ТекстЗапроса;
НаборЗаписей = Команда.Execute();
    

Команда.Execute(ТекстЗапроса);

ничего не смущает?

Команда про свой тип: Команда.CommandType = adCmdText;

сама догадываться должна?

(10) Так работает,спасибо)