Форум: "Базы";
Текущий архив: 2010.01.17;
Скачать: [xml.tar.bz2];
ВнизРЕгистрация Найти похожие ветки
← →
Noir (2009-02-01 11:44) [0]В общем проблема такая,мне надо написать регистрацию через клиент сервер ..в общем человек коннектиться заполняет едиты отправляет все на сервер там все добавляется в бд ,это все сделано ..у меня есть ячейка показывающая айпишник пользователя ...
я хочу сделать так что б если айпи такой уже зареган ,то выводилось сообщение на сервере уже зареган такой пользователь с таким айпи адрессом проходит поиск
ADOQuery1.SQL.Add("select* from ПОльзователи where IP="+QuotedStr(edit4.text));
потом проверка
if ADOQuery1.Eof then
но в любом случае если я регистрируюсь ,то пишет что такой есть пользователь
вот код серверсокета на событие чтения от пользоователя
procedure TForm1.ServerSocketClientRead(Sender: TObject;
Socket: TCustomWinSocket);
var I: integer;
s:string;
begin
for I:=0 to ComponentCount-1 do
begin
if Components[i] is TEdit then
begin
if TMEdit(Components[i]).Text="" then
TMEdit(Components[i]).Text:=Socket.ReceiveText;
end;
end;
if (edit1.text<>"") and (edit2.text<>"") and (edit3.text<>"") and (edit4.text<>"") then
begin
form1.ADOQuery1.Insert;
form1.ADOQuery1Name.AsString:=Edit1.Text;
form1.ADOQuery1Fam.AsString:=Edit2.Text;
form1.ADOQuery1Email.AsString:=Edit3.Text;
form1.ADOQuery1IP.AsString:=Edit4.Text;
form1.ADOQuery1.Post;
button3.Click;
end;
ADOQuery1.SQL.Add("select* from ПОльзователи where IP="+QuotedStr(edit4.text));
if ADOQuery1.Eof then
showmessage ("Уже есть");
end;
обьясните может я не в очередь вставил проверку на такого пользователя?
если можете напишите этот код правельно потому что я новичек в делфи
← →
Сергей М. © (2009-02-01 12:08) [1]
> вот код серверсокета
Он какое отношение имеет к теметике конференции "Базы" ?
Абсолютно никакого.
← →
Noir (2009-02-01 12:47) [2]эм..я имел ввиду код на событие когда что то приходит на сервер..а помощь мне нужна с бд...если бы я этого не написал тебе было бы легче?ЛУчши помоги с проблемой
← →
Сергей М. © (2009-02-01 13:00) [3]
> код на событие когда что то приходит на сервер
А какая разница, когда выполняется этот код ?
Никакой.
Так зачем же ты приплел сюда все касаемое сети, тем более что работать оно в условиях глоб.сети зведомо не будет ?
Отделяй мух от котлет.
← →
Сергей М. © (2009-02-01 13:18) [4]
> помощь мне нужна с бд
Где у тебя в коде оператор, запускающий select-запрос на выполнение ?
← →
Noir (2009-02-01 13:21) [5]ADOQuery1.SQL.Add("select* from ПОльзователи where IP="+QuotedStr(edit4.text));
← →
b z (2009-02-01 13:24) [6]А почему проверка идет после создания записи?
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2010.01.17;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.014 c