Код

CREATE TABLE test_table
(
  id integer NOT NULL DEFAULT nextval('test_table_id_seq'),
  file_in_base bytea NOT NULL,
  CONSTRAINT id_pkey PRIMARY KEY (id)
)
WITH (OIDS=FALSE);
ALTER TABLE test_table OWNER TO postgres;
 

Код

_ПодготовленныйЗапрос.Открыть("SELECT * FROM test_table");

ТипSQL= "";
ДлинаSQL= "";
ТочностьSQL= "";
МожетБытьNULL = "";

ИмяПоля = _ПодготовленныйЗапрос.ПолучитьПараметрыПоля(
	2,,,,ТипSQL, ДлинаSQL, ТочностьSQL, МожетБытьNULL);
Сообщить("Имя - "+ИмяПоля+" тип "+ТипSQL+" длина "+ДлинаSQL+" точность "+ТочностьSQL+" ISNULL "+МожетБытьNULL);
 

Код

DROP TABLE test_table;

CREATE TABLE test_table
(
  id integer NOT NULL,
  file_in_base bytea NOT NULL,
  CONSTRAINT id_pkey PRIMARY KEY (id)
)
WITH (OIDS=FALSE);
ALTER TABLE test_table OWNER TO postgres;

INSERT INTO test_table(
            id, file_in_base)
    VALUES (1, 'testtesttesttesttest1');
 

Код

СтрокаПодключения = "Driver={PostgreSQL ANSI};Server=localhost;Port=5432;Database=chimera;Uid=postgres;Pwd=test;";

_Содинение = СоздатьОбъект("ODBCDataBase");
_Содинение.Соединение(СтрокаПодключения);

_ЗапросКПостГрессу = СоздатьОбъект("ODBCRecordSet");
_ЗапросКПостГрессу.Отладка(1);
_ЗапросКПостГрессу.УстБД(_Содинение);

тз = _ЗапросКПостГрессу.ВыполнитьИнструкцию("select * from test_table");