GARANTIR DESCONTO

Fórum Problema com Query (duvida simples) #348021

26/10/2007

0

Estou com uma dúvida de como fazer uma Query usando o ADOConection

Ja fiz toda a ligação no banco de dados, coloquei um ADOConnection1, um DataSource1 e um ADOQuery1. Ligado a um Db grid

no (TStrings) esta.


Select * from usuarios 

Mostra todos os usuarios
Mas
Estou com problemas ja na sintaxe do comando, pois colocando o codigo abaixo já da erro
Select * from usuarios where login =: ´michele´


O que eu preciso fazer é o seguinte.
Em um edit1 o usuario digita o login e um botão executa a query e me retorna se o login existe na tabela ou nao.

E depois conferir com a senha dele.

Se alguem puder ajudar desde já agradeço.


Michele

Michele

Responder

Posts

26/10/2007

Facc

tente assim
SELECT * FROM TABELALOGIN WHERE LOGIN = ´ + QUOTESTR(EDIT1.TXT);

IF QUERY.RECORCOUNT > 0 THEN
  LOGIN EXITE
ELSE
  LOGIN NÃO EXISTE



É UMA FORMA GENÉRICA QUE EU PASSEI...


Responder

Gostei + 0

26/10/2007

Michele

nao entendi.
Aonde coloco esse código?


Responder

Gostei + 0

26/10/2007

Facc

nao entendi. Aonde coloco esse código?


no botão


Responder

Gostei + 0

26/10/2007

Mayron Cachina

Onclick do Botao1;
begin
  AdoQuery1.sql := ´SELECT * FROM TABELALOGIN WHERE LOGIN = ´ + QUOTESTR(EDIT1.TXT);

  IF ADOQUERY1.RECORCOUNT > 0 THEN
    showmessage(´LOGIN EXITE´)
  ELSE
    showmessag(´LOGIN NÃO EXISTE´);

end.



deu pra entender melhor agora???
vc vai ter q ter um ADOQUERY para colocar o sqlect dentro... esse select so pode ser no codigo n pode ser direto no componente por causa do QUOTESTR(EDIT1.TXT).

qualquer coisa eu faço um exemplo e disponibilizo pra dowload, ok?


Responder

Gostei + 0

26/10/2007

Michele

Eu entendi sim.
Mas to me perdendo ainda.
Porque preciso pegar o valor da query. No caso o resultado da query.
Por exemplo:
Como jogo o campo e-mail num edit1?


Responder

Gostei + 0

26/10/2007

Mayron Cachina

vc faz assim:

Edit1.text := AdoQuery1.fieldbyname(´email´).asString;


assim oq tiver no campo email será levado pra o Edit...


Responder

Gostei + 0

26/10/2007

Michele

Um erro aqui
Undeclared identifier: ´QUOTESTR´
[/code]


Responder

Gostei + 0

26/10/2007

Mayron Cachina

hehehe o comando correto eh [b:f4e761d7df]QUOTSTR()[/b:f4e761d7df]

SELECT * FROM TABELALOGIN WHERE LOGIN = ´ + QUOTSTR(EDIT1.TXT); 


Tenta agora
hehehehe


Responder

Gostei + 0

26/10/2007

Michele

Agradeço muito,
Deu certinho aqui.


Responder

Gostei + 0

26/10/2007

Paulo

É
[color=red:2b621ea9cd]QUOTEDSTR E NÃO QUOTSTR[/color:2b621ea9cd]


Responder

Gostei + 0

26/10/2007

Mayron Cachina

É [color=red:fa70c793e8]QUOTEDSTR E NÃO QUOTSTR[/color:fa70c793e8]


Erro meu :D
oq sou eu sem o Auto Complete do Delphi hehehehehe


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar