Главная страница
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.018 c
3-13939
Nazareth
2002-08-15 14:32
2002.09.05
Проблема переносимости из Delphi 5 в Delphi 6


7-14291
Arsen
2002-06-21 12:24
2002.09.05
Звук в Delphi


6-14206
Aleksandr
2002-06-25 15:33
2002.09.05
Как из вернутого сообщения выдернуть адресат?


4-14357
Dmk
2002-07-01 04:27
2002.09.05
Может Message?


8-14173
TonyK
2002-04-30 00:35
2002.09.05
Посоветуйте компонент для работы со сканером (TWAIN)...