Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.09.05;
Скачать: CL | DM;

Вниз

Помогите с SQL   Найти похожие ветки 

 
Guest2   (2002-08-16 11:58) [0]

Мастера, помогите.
Требуется:
Заполняется форма для вставки в удалённую БД(локальная сеть - путь известен).Одно из полей формы - номер.
Как проверить наличие этого номера в БД?????
Использовал запрос
If ("select num from путь where num=strtoint("""+Form2.edit1.text+""")")=true then...
предупреждение.
else
вставка новой записи.
Выдаётся ошибка о несовместимости String и Boolean. Это понятно.
Как правильно составить запрос?


 
Val ©   (2002-08-16 12:04) [1]

Q.Text := "select num from path where num =:num";
Q.ParamByName(:num).AsInteger = 777;
Q.Open;
if Q.RecordCount>0 then
exists;
else
notexists;


 
Guest2   (2002-08-16 12:11) [2]

Если можно, пояснить вторую строку
Q.ParamByName(:num).AsInteger = 777;


 
Guest2   (2002-08-16 12:25) [3]

Использовал такую конструкцию
form1.query1.active:=false;
form1.query1.sql.clear;
form1.query1.sql.add("select * from \\Gorski\Common\Sklad\dilears.db where num=strtoint("""+Form2.edit1.text+""")");
form1.query1.execsql;
form1.query1.active:=true;
if form1.query1.RecordCount>0 then
messageDLG("


 
passm   (2002-08-16 12:32) [4]

В 3-ей строке обрати внимание на StrToInt(...) - это, как я понял, попытка совместить программный код с SQL - предложением, что и приводит к ошибке.
"select...where num = :num"
Но предварительно заполни параметр num.


 
Val ©   (2002-08-16 12:32) [5]

>Guest2 (16.08.02 12:11)
Если можно, пояснить вторую строку
это параметры, можно посмотреть в хелпе.
...
form1.query1.sql.add("select * from "\\Gorski\Common\Sklad\dilears.db" where num=:n");
form1.query1.ParamByName(:n).AsInteger:= StrToInt(Form2.Edit1.Text);
form1.query1.OPEN;//!!!!
if ...



 
Guest2   (2002-08-16 12:38) [6]

Спасибо, поехало


 
Mike Kouzmine   (2002-08-16 12:39) [7]

Наверное form1.query1.ParamByName("n").


 
Val ©   (2002-08-16 12:58) [8]

>Mike Kouzmine (16.08.02 12:39)
точно :)


 
VAleksey ©   (2002-08-16 13:02) [9]

Ты сам то понял чего написал ???
Если еще нет , то возьми пару книг по БД в делфи, почитай, а потом поржи вместе с нами над кодом :))).
ЗЫ
Прошу прощения за резкость, но действительно прикольно.



Страницы: 1 вся ветка

Текущий архив: 2002.09.05;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.021 c
1-14119
id_privin
2002-08-23 11:36
2002.09.05
Sender is not! TButton


1-14007
Still Swamp
2002-08-23 18:07
2002.09.05
Информация о DLL и EXE


1-14106
den_dnepr
2002-08-23 17:11
2002.09.05
Version Info


1-14070
ao1973
2002-08-27 11:04
2002.09.05
Разными цветами в ComboBox -е


1-13995
BDRON
2002-08-25 23:34
2002.09.05
Английский словарь