[fatalzero]

Здравствуйте. Не могу выполнить запрос в Delphi

Код:

  With ADOQuery1 do begin
    SQL.Clear;
    Sql.add(' Select reg_num from MAIN where Reg_Num in  ');
    Sql.add( '(select l_reg_num--, count(*) from LINKS where CODE=30 group  by L_REG_NUM having count(*)>1)');
    Sql.add('and (Akt_Text_HTML not like ''%&gt;</ins><ins cite=""mailto:NCPI-%'')');
    Active:=false;
    Active:=true;
    end;

на SQL SERVER 2008 этот запрос выполняется без проблем

[poli-smen]

Сообщение от fatalzero

Здравствуйте. Не могу выполнить запрос в Delphi
.....
на SQL SERVER 2008 этот запрос выполняется без проблем

И ошибок никаких не выдаёт?

[fatalzero]

Ошибка Delphi: Неправильно определен объект параметр. Предовставлены несовместимые или не полные сведения.

[Alegun]

Так на вскидку - много пробелов (' ') в коде наблюдается, может убрать что-то лишнее, а вдруг заработает?

[NumLock]

вангую, часть запроса

cite=""mailto:NCPI-%'')');

NCPI воспринимает как параметр, ибо ":" перед

NCPI воспринимается как параметр запроса

[poli-smen]

Сообщение от NumLock

NCPI воспринимается как параметр запроса

Да. В этом запросе часть NCPI-%'' ошибочно воспринимается как параметр. Нужно перед присваиванием такого запроса установить свойство ParamCheck в False и ещё желательно очистить список параметров:

Код:

  ADOQuery1.ParamCheck := False;
  ADOQuery1.Parameters.Clear;
  // Теперь можно заполнять свойство ADOQuery1.SQL

[fatalzero]

Спасибо за ответы, но всеравно ругается: Неправильный синтаксис около ключевого слова "and"

Код:

With ADOQuery1 do begin
    ParamCheck := False;
    Parameters.Clear;
    SQL.Clear;
    Sql.add(' Select reg_num from MAIN where Reg_Num in  ');
    Sql.add( '(select l_reg_num--, count(*) from LINKS where CODE=30 group by L_REG_NUM having count(*)>1)');
    Sql.add('and (Akt_Text_HTML not like ''%&gt;</ins><ins cite="mailto:NCPI-%'')');
    Active:=false;
    Active:=true;
    end;

И если закоментировать последнее добавление Sql.add, то пишет: неправильный синаксис возле l_reg_num.

[Alegun]

Похоже помимо Clear запросу нужно ещё и Close..Open