[poli-smen]

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

Да, так работает

Значит в этих записях (которые выбираются) есть как минимум одно пустое поле, а запрос рассчитан так, что если хоть одно из перечисленных полей пустое, то такая запись заведомо исключается из выборки. Чтобы выбиралось по-другому - запрос нужно переписать соответственно.

[yuoras]

Сообщение от poli-smen

Чтобы выбиралось по-другому - запрос нужно переписать соответственно.

Можете помочь в написании правильного запроса?
Кстати, в других колонках есть действительно пустые поля, но эти данные без проблем отображаются.
Возьмём к примеру колонку "street", там есть и пустые значения , в даном поле есть и буквы ,цифры ,дроби.
Но без проблем выбираются

[poli-smen]

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

Можете помочь в написании правильного запроса?

Такой запрос исключит записи в которых все перечисленные поля пустые:

Код:

SELECT DISTINCT 'ip'=sety, 'л'=licn, 'н.'=name, 'т'=tipesch, 'улица'=street, 'ном.дома'=nbild, 'квартира'=kvart
FROM tb_obj country
WHERE
  (
  sety LIKE :sety_param
  OR licn LIKE :licn_param
  OR name LIKE :name_param)
  OR street LIKE :street_param
  OR nbild LIKE :nbild_param
  OR kvart LIKE :kvart_param
  )
  AND
  NOT(
    ((sety IS NULL) OR (sety = '')) AND
    ((licn IS NULL) OR (licn = '')) AND
    ((name IS NULL) OR (name = '')) AND
    ((street IS NULL) OR (street = '')) AND
    ((nbild IS NULL) OR (nbild = '')) AND
    ((kvart IS NULL) OR (kvart = ''))
  )
ORDER BY licn, nbild, kvart

[yuoras]

Тоже ,что и в сообщении №6
Клапаю по любому из editoв и уже появляются какие то значения (ещё даже не вводил ничего).
Но в kvart уже можно выбирать название )))).
Правда как то странно отображается , сначала сверху , потом разные не нужные строки , а потом остальной кусок нужного..

Спасибо, что помогаете !!.

[poli-smen]

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

Тоже ,что и в сообщении №6
Клапаю по любому из editoв и уже появляются какие то значения (ещё даже не вводил ничего).

А какой обработчик клапания привязан к тому edit-у?

[yuoras]

Да ничего не привязано .
Использовал запрос из сообщения №9
Всё нормально , но в столбце kvart не ищет буквенные значения, но не мусора в клапаниях в EDITaм нет.

[Yurk@]

тогда уж наверное так

Код:

SELECT DISTINCT 'ip'=sety, 'л'=licn, 'н.'=name, 'т'=tipesch, 'улица'=street, 'ном.дома'=nbild, 'квартира'=kvart
FROM tb_obj country
WHERE
  (
  (sety LIKE :sety_param AND sety IS NOT NULL AND sety <> '')
  OR (licn LIKE :licn_param AND licn IS NOT NULL AND licn <> '')
  OR (name LIKE :name_param AND name IS NOT NULL AND name <> '')
  OR (street LIKE :street_param AND street IS NOT NULL AND street <> '')
  OR (nbild LIKE :nbild_param AND nbild IS NOT NULL AND nbild <> '')
  OR (kvart LIKE :kvart_param AND kvart IS NOT NULL AND kvart <> '')
  )
ORDER BY licn, nbild, kvart

[yuoras]

Ура .
З А Р А Б О Т А Л О .

Мир не без Добрых людей

Искренняя Блогадарность Вам Yurk@

[yuoras]

Простите за надоедливость !!
Использую шаровый sql 2005 и доступ к базе по ip выглядит вот так xx.xx.xx.xx\sqlexpress

Постоянно набирать после ip ещё и \sqlexpress не очень удобно.
Где можно в указанном ниже коде ,прописать вот этот \sqlexpress .
Что бы только вводить IP.

PS. Псевдоним сервера не предлагать !!


Заранее благодарен

[Alegun]

Вероятно

Код:

';Data Source='+ServerName+'\sqlexpress';

[yuoras]

Простите за не скромность , а можно ComboBox ы прикрутить (или что то , где можно выбирать , а не вводить в ручную).
Постоянно надо выходить и заходить на другие сервера и постоянно в ручную всё вводить!.

Заранее благодарен

[poli-smen]

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

Простите за не скромность , а можно ComboBox ы прикрутить (или что то , где можно выбирать , а не вводить в ручную).
Постоянно надо выходить и заходить на другие сервера и постоянно в ручную всё вводить!.

Конечно можно. Создай ещё одну форму, брось на неё 4 ComboBox-а (можно их назначение подписать с помощью 4-х Label-ов) и 2 кнопки: "Подключить" и "Отмена". Форму эту показывай через ShowModal и если в результате будет нажата кнопка "Подключить" - считывай значения с ComboBox-ов в строку подключения и подключай.

[yuoras]

Попробую поиграться

[yuoras]

Получилось вот так, возможно не правильно, но работает

Код:

procedure TForm6.Button1Click(Sender: TObject);
begin
form2.ADOConnection.Close;
form2.ADOConnection.ConnectionString:=form2.ADOConnection.ConnectionString+';User ID='+combobox3.Text;
form2.ADOConnection.ConnectionString:=form2.ADOConnection.ConnectionString+';Password='+edit1.Text;
form2.ADOConnection.ConnectionString:=form2.ADOConnection.ConnectionString+';Initial Catalog='+combobox2.Text;
form2.ADOConnection.ConnectionString:=form2.ADOConnection.ConnectionString+';Data Source='+combobox1.Text;