Login CLIENTE/SERVER

Delphi

25/06/2003

Aew pessoal, tenho a seguinte rotina para fazer LOGIN de usuarios no meu programa:

[b:32187a90cc]if table1.locate(´campo de usuario´,edit1.text,[]) and (table1senha.value=edit2.text) then
Begin
abre o sistema
end
else
begin
showmessage(´usuário ou senha incorretos´);
end;[/b:32187a90cc]

Estou fazendo um programa CLIENTE/SERVIDOR que se conectam em maquinas remotas, e gostaria que este codigo acima, no momento que eu conectasse o CLIENTE no SERVIDOR, o SERVIDOR pedisse com este codigo a senha cadastrada.

Como fazer isso ?

Espero que possam me ajudar e agradeço desde já,
Rodrigo![/b]


Ropesca

Ropesca

Curtidas 0

Respostas

Ropesca

Ropesca

25/06/2003

Aew pessoal, tenho a seguinte rotina para fazer LOGIN de usuarios no meu programa:

[b:895fc12680]if table1.locate(´campo de usuario´,edit1.text,[]) and (table1senha.value=edit2.text) then
Begin
abre o sistema
end
else
begin
showmessage(´usuário ou senha incorretos´);
end;[/b:895fc12680]

Estou fazendo um programa CLIENTE/SERVIDOR que se conectam em maquinas remotas, e gostaria que este codigo acima, no momento que eu conectasse o CLIENTE no SERVIDOR, o SERVIDOR pedisse com este codigo a senha cadastrada.

Como fazer isso ?

Espero que possam me ajudar e agradeço desde já,
Rodrigo!


GOSTEI 0
Henry

Henry

25/06/2003

Meu brother, use o componente session, me da um toque no ICQ que eu te mostro como se faz, blz? meu unin é 221075981.


GOSTEI 0
Ropesca

Ropesca

25/06/2003

Meu brother, use o componente session, me da um toque no ICQ que eu te mostro como se faz, blz? meu unin é 221075981.


Não tenho ICQ, me fala ai como eh...

Entendesse direitinho o q quero neh ?


GOSTEI 0
POSTAR