Delphi 7 синтаксис sql запроса

[detalik]

Подскажите, плиз, как реализовать

[detalik]

SELECT [пользователь], [имя компьютера], [ip адрес]
FROM buh
WHERE buh.[ip адрес] =:IPaddr AND buh.[пользователь]=:User;

Попробовал так, ошибок синтаксиса не выдает, но запрос не выполняет, не ищет...

[detalik]

procedure TForm1.Button2Click(Sender: TObject);
begin
ADOQuery2.Close;
ADOQuery2.Parameters.ParamByName('I Paddr').Value:=Edit2.Text;
ADOQuery2.Open;

end;



procedure TForm1.Button3Click(Sender: TObject);
begin
ADOQuery2.Close;
ADOQuery2.Parameters.ParamByName('I Paddr').Value:=Edit3.Text;
ADOQuery2.Open;
end;

процедуры для кнопок поиска

[OlegVE]

Здравствуйте

SELECT [пользователь], [имя компьютера], [ip адрес]
FROM buh 
WHERE buh.[ip адрес] =:IPaddr AND buh.[пользователь]=:User;

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

Попробовал так, ошибок синтаксиса не выдает, но запрос не выполняет, не ищет...

Может запрос и выполняется, но возвращается результат в котором есть одновременно два условия (результат может быть и пустым, это тоже результат)... при AND у Вас должно одновременно совпадать в одной записи [ip адрес] и [пользователь]. Если заменить на OR, - будут возвращаться результаты как для [ip адрес], так и для [пользователь]. Вам надо сделать две кнопки и для каждой кнопки свой запрос (ADOQuery2.SQL.Text := ...).
До свидания
P.S. Пока отвечал Вы уже написали больше пояснений. Но! Для Button3 у Вас опять параметр 'I Paddr'. Даже с учётом добавки вышесказанное остаётся верным.

[detalik]

procedure TForm1.Button2Click(Sender: TObject);
begin
ADOQuery2.Close;
ADOQuery2.Parameters.ParamByName('I Paddr').Value:=Edit2.Text;
ADOQuery2.Open;

end;



procedure TForm1.Button3Click(Sender: TObject);
begin
ADOQuery2.Close;
ADOQuery2.Parameters.ParamByName('User').Value:=Edit3.Text;
ADOQuery2.Open;
end;

Да все правильно я так и сделал, на предыдущей странице выложен скрин, на форму добавлен дополнительный Edit и Button, в который вводится фамилия пользователя. Кстати, я опечатался исправил процедуру для Button3, но результат тот же, ввожу фамилию в edit3, поле edit2 оставляю пустым,т.к нужен поиск именно по фамилии, но результат - пустой, хотя такого быть не должно.

[OlegVE]

Сегодня Вы невнимательно читали то, что я написал. Возможно Вы не видели добавки...

procedure TForm1.Button2Click(Sender: TObject);
begin
ADOQuery2.Close;
ADOQuery2.SQL.Text := 'SELECT [пользователь], [имя компьютера], [ip адрес] FROM buh WHERE buh.[ip адрес] =:IPaddr';
ADOQuery2.Parameters.ParamByName('I Paddr').Value:=Edit2.Text;
ADOQuery2.Open;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
ADOQuery2.Close;
ADOQuery2.SQL.Text := 'SELECT [пользователь], [имя компьютера], [ip адрес] FROM buh WHERE buh.[пользователь]=:User;';
ADOQuery2.Parameters.ParamByName('U ser').Value:=Edit3.Text;
ADOQuery2.Open;
end;

P.S. В пятницу, субботу и воскресенье на форуме не бываю.

[detalik]

через OR вроде работает, спасибочки. Надо потестить)))
P.S.
С утра уже Вас заждался, думаю беда, никто уже не поможет)))

[detalik]

Сначала попробовал через OR, но процедуры для кнопок не менял, он тогда выводит результаты следующим образом:
выполняю запрос по пользователю- вывел, затем по ip - вывел в следующей строке.
После этого прочитал Ваш пост, где изменен код процедур, переписал, и при различных запросах, он переписывает результаты поиска в одной строке.
Даже еще не знаю, как удобней)))
Огромное спасибо!!!