Вниз
Скачать: CL | DM;

Базы данных   Найти похожие ветки 

← →
Жорж   (2003-09-01 16:34) [0]

Здравствуйте! Помогите пожалуйста решить такой вопрос:
Имеется база телефонных номеров, которые пополняются ежедневно
как можно сделать чтобы при введении нового номера, происходил поиск в базе такого номера если он есть выдавалось сообщение если нет то номер заносился бы в базу?
Заранее спасибо.


← →
Reindeer Moss Eater ©   (2003-09-01 16:37) [1]

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

Для этого надо написать небольшую программу


← →
Stas ©   (2003-09-01 16:43) [2]

Само просто
if not Query1.Locate ("MyField",2663211,[]) then
begin
Query1.Insert;
...
end;


← →
DelphiNew ©   (2003-09-01 16:43) [3]

Попробуй так
function SeqSearch(AQuery: TQuery; AField, AValue: String): Boolean;
begin
with AQuery do
begin
First;
while (not Eof) and (not (FieldByName(AField).AsString = AValue)) do
Next;
SeqSearch := not Eof;
end;
end;
Но он не подходит при кол-ве записей больше 1000 так как будет сильно тормозить


← →
HSolo ©   (2003-09-01 17:34) [4]

СУБД какая?


← →
Жорж   (2003-09-01 17:48) [5]

DBASE IV


← →
Карелин Артем ©   (2003-09-01 18:59) [6]

А DBASE IV поддерживает уникальные индексы?? ;)


← →
Anatoly Podgoretsky ©   (2003-09-01 20:32) [7]

Жорж (01.09.03 17:48) [5]
Сделай индекс по полю номера и FindKey

Карелин Артем © (01.09.03 18:59) [6]
Нет, только dBase VII+


← →
Anatoly Podgoretsky ©   (2003-09-01 20:33) [8]

Альтернатива запрос с условием where fld = номер.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
3-71468
PaveL
2003-08-28 21:32
2003.09.22
ClientDataSet и ftListBox


3-71564
Relaxxx
2003-08-27 16:52
2003.09.22
Как мне округлить значение до сотых???


8-71757
llyr
2003-05-27 16:34
2003.09.22
как в mediaplayer проверить существование нужного кодека ?


1-71698
Стрелок
2003-09-11 08:41
2003.09.22
Знаки на рабочем столе!


11-71567
Ahmad K
2003-01-15 01:24
2003.09.22
Ну никак не получается...




   Наверх