Consultas com SQL - preciso de ajuda por favor
:oops: Caros colegas peciso mas não consigo filtra duas tabelas diferens (de forma relacionada) com o uso de SQL.
Como:
DM.QQuantidade.Active:=False;
DM.QQuantidade.SQL.Clear;
DM.QQuantidade.SQL.Add(´Select Cod_marca, Cod_produto From Produto.DB, Quantidade.DB Where QProduto.DB = Quantidade.DB);
DM.QQuantidade.Active;
Ou
DM.QQuantidade.Active:=False;
DM.QQuantidade.SQL.Clear;
DM.QQuantidade.SQL.Add(´Select Cod_marca, Cod_produto From Produto.DB, Quantidade.DB Where QProduto.DB = Quantidade.DB);
DM.QQuantidade.Active;
Qual das duas passa mais perto de dar certo?
a Query esta em um Data Modul
Versáo 6.0
Por favor o que eu faço?
Como:
DM.QQuantidade.Active:=False;
DM.QQuantidade.SQL.Clear;
DM.QQuantidade.SQL.Add(´Select Cod_marca, Cod_produto From Produto.DB, Quantidade.DB Where QProduto.DB = Quantidade.DB);
DM.QQuantidade.Active;
Ou
DM.QQuantidade.Active:=False;
DM.QQuantidade.SQL.Clear;
DM.QQuantidade.SQL.Add(´Select Cod_marca, Cod_produto From Produto.DB, Quantidade.DB Where QProduto.DB = Quantidade.DB);
DM.QQuantidade.Active;
Qual das duas passa mais perto de dar certo?
a Query esta em um Data Modul
Versáo 6.0
Por favor o que eu faço?
Anonymous
Curtidas 0
Respostas
Romeusql
22/02/2003
Oi Tente assim
[b:e8fc5e162b]With DM.QQuantidade Do
Begin
Close ;
sql.clear
Sql.add(´Select * From Tabela1,tabela2 Where codigo1 = Codigo2
Group By Codigo1,Codigo2´);
prepare;
open;
End;[/b:e8fc5e162b]
[b:e8fc5e162b]With DM.QQuantidade Do
Begin
Close ;
sql.clear
Sql.add(´Select * From Tabela1,tabela2 Where codigo1 = Codigo2
Group By Codigo1,Codigo2´);
prepare;
open;
End;[/b:e8fc5e162b]
GOSTEI 0