Fórum Criar Dois Parametros em uma tabela #358780
19/05/2008
0
Galer a como eu crio dois parametro em uma tabela ?
Tenho uma tabela musica com os seguintes campos:
Codigo ,nome,artista,album estilo, onde artista ,albume estio estão relacionadas as tabela artista,album e estilo.
Queria criar dois parametros um para o campo nome e outro para o campo estilo não estou conseguindo criar para o campo estilo talves por ser uma chave estrangeira.
a instrução SQL é :select * from MUSICA where upper(nome) like(:nome) order by codigo
E o código é :
DM.cdsMusica.Close;
DM.cdsMusica.Params[0].AsString:=UpperCase(Edit1.Text) + ´¬´;
DM.cdsMusica.Open;
Essa instrução SQL e o codigo é para o campo nome , e agora como faço para o campo estilo ,alguém por gentileza poderia me ensinar?
Desde já eu agradeço!!!!
Tenho uma tabela musica com os seguintes campos:
Codigo ,nome,artista,album estilo, onde artista ,albume estio estão relacionadas as tabela artista,album e estilo.
Queria criar dois parametros um para o campo nome e outro para o campo estilo não estou conseguindo criar para o campo estilo talves por ser uma chave estrangeira.
a instrução SQL é :select * from MUSICA where upper(nome) like(:nome) order by codigo
E o código é :
DM.cdsMusica.Close;
DM.cdsMusica.Params[0].AsString:=UpperCase(Edit1.Text) + ´¬´;
DM.cdsMusica.Open;
Essa instrução SQL e o codigo é para o campo nome , e agora como faço para o campo estilo ,alguém por gentileza poderia me ensinar?
Desde já eu agradeço!!!!
Lsksskyblu
Curtir tópico
+ 0
Responder
Posts
20/05/2008
Emerson Nascimento
altere a instruçao para:
select * from MUSICA where upper(nome) like(:nome) and upper(estilo) like :estilo order by codigo
E o código é :
DM.cdsMusica.Close;
DM.cdsMusica.Params[0].AsString:=UpperCase(Edit1.Text) + ´¬´;
DM.cdsMusica.Params[1].AsString:=UpperCase(EditEstilo.Text) + ´¬´;
DM.cdsMusica.Open;
select * from MUSICA where upper(nome) like(:nome) and upper(estilo) like :estilo order by codigo
E o código é :
DM.cdsMusica.Close;
DM.cdsMusica.Params[0].AsString:=UpperCase(Edit1.Text) + ´¬´;
DM.cdsMusica.Params[1].AsString:=UpperCase(EditEstilo.Text) + ´¬´;
DM.cdsMusica.Open;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)