Проблема с sql запросом в Delphi

[CRASH040]

Привет помогите пожалуйста запутался! на данный момент проблема такая при выполнении ставлю флажок и сразу и вылезает такая ошибка:
параметр NUM_REP не имеет значение по умолчанию что это за параметр?

procedure TForm1.CheckListBox1Click(Sender: TObject);
var
s:STRING;
i,k:integer;
begin
with Form1.ADOQuery2 do begin close;
k:=0;
SQL.Clear;
SQL.Add ('SELECT Âóç.¹, Âóç.[Íàçâàíèå âóçà], Âóç.[Íàçâàíèå ñïåöèàëüíîñòè], Âóç.[Ôîðìà îáó÷åíèÿ], Âóç.[Âèä îáó÷åíèÿ], Âóç.[Êîíêóðñ ïðîøëîãî ãîäà], Âóç.[Ïëàòà çà îáó÷åíèå]');
SQL.Add (' FROM Âóç ');
s:='';
for i:=0 to CheckListBox1.Items.Count - 1 do
if CheckListBox1.Checked[i] then
begin
f k=0 then
s:=s+(' NUM_REP ='+CheckListBox1.Items[i])
ELSE
s:=s+(' OR NUM_REP ='+CheckListBox1.Items[i]);
k:=1;
END;
if s<>'' then
SQL.Add(' where '+s);
Open;
Datasource1.dataset:=AdoQuery2;
end; end;

[evg_m]

параметр NUM_REP не имеет значение по умолчанию что это за параметр?

у ADO Access есть особенность. Все имена в запросе которые не сопоставить с БД он относит к параметрам. Т.е. в БД(в таблице) нет поля NUM_REP

[CRASH040]

С этим разобрался поменял поле .
s:=s+(' Название вуза ='+CheckListBox1.Items[i])
ELSE
s:=s+(' OR Название вуза ='+CheckListBox1.Items[i]);
k:=1;

теперь проблема где поменял название пишет пропущен оператор. только что там за оператор должен быть?

[OlegVE]

Здравствуйте
Попробуйте так

s:=s+(' [Название вуза] ='+QuotedStr(CheckListBox1.Items[i]))
ELSE
s:=s+(' OR [Название вуза] ='+QuotedStr(CheckListBox1.Items[i]));

и придерживайтесь синтаксиса SQL Вашей базы данных, что Вам и показано, который Вы можете проверить в самой базе данных, без Delphi.
До свидания

[CRASH040]

OlegVE

это не помогло вылетает таже ошибка.

[OlegVE]

Попробуйте так

s:=s+(' [Название вуза] ="'+CheckListBox1.Items[i]+'"')
ELSE
s:=s+(' OR [Название вуза] ="'+CheckListBox1.Items[i]+'"');

Плюс

SQL.Add(' where '+s+';');

Плюс сделайте это

SQL.Add ('SELECT Âóç.¹, Âóç.[Íàçâàíèå âóçà], Âóç.[Íàçâàíèå ñïåöèàëüíîñòè], Âóç.[Ôîðìà îáó÷åíèÿ],
 Âóç.[Âèä îáó÷åíèÿ], Âóç.[Êîíêóðñ ïðîøëîãî ãîäà], Âóç.[Ïëàòà çà îáó÷åíèå]');
SQL.Add (' FROM Âóç ');

более читаемым

и придерживайтесь синтаксиса SQL Вашей базы данных, что Вам и показано, который Вы можете проверить в самой базе данных, без Delphi.

Добавка
Разберитесь с Вашим OR (отметил синим выше). У Вас может появиться "WHERE OR" при первой неудаче

if CheckListBox1.Checked[i] then

Может k сделать строкой, и при первой удаче присвоить " OR " тогда

s:=s+( k+ ' NUM_REP ='+CheckListBox1.Items[i]);
k := " OR ";

[CRASH040]

вчера ещё так пробовал ничего не получается!
Я скинул прогу посмотри может получится, а то может у меня ещё там что не так и поэтому не работает.

[OlegVE]

По высланному Вами проекту:
1. Удалите из ADOQuery1 DataSource. У Вас стоит DataSource1.
2. [Название вуза] Слона то я и не приметил. Выше тоже подправил.

[CRASH040]

OlegVE

огромное спасибо тебе очень помог)