Olá pessoal estou fazendo uma consulta c/ 2 bancos procuro alguns
dados no 1º e outros no 2º, porém estes dados tem q aparecer somente
se a id_aluno dos dois bancos forem iguais e acho q estou fazendo
algo de errado nos clients e cmo nao tenho muita esperiência c/ este
componente... Da erro no id_aluno dos dois clients..
Se alguem puder m ajudar desde já agradeço!
begin
dm.SQLLocalizar.Close;
dm.ClientLocalizar.Active := false;
dm.SQLLocalizar.CommandText:='Select
id_aluno,apelido,celular from Usuario';
dm.SQLLocalizar.Open;
dm.ClientLocalizar.Active := true;
dm.SQLLocalizaAluno.Close;
dm.ClientLocalizaAluno.Active := false;
dm.SQLLocalizaAluno.CommandText :=' Select
a.id_aluno,a.nome_aluno,a.endereco,a.numero_end, '
+'
a.id_cidade_endereco,a.fone,e.id_estrutura,e.nome,c.id_cidade,c.nome_c
idade, '
+' m.id_matricula,m.id_aluno,m.id_estrutura '
+' from Cad_Alunos a,Cidades c,Cad_estruturas
e,Matriculas m '
+' where upper(nome_aluno) like :nome and
a.id_cidade_endereco=c.id_cidade '
+' and a.id_aluno=m.id_aluno and
e.id_estrutura=m.id_estrutura and a.id_aluno=:id_aluno order by 2 ';
texto:= Ednome.Text+'%';
dm.SQLLocalizaAluno.ParamByName('nome').AsString :=
uppercase(texto);
dm.SQLLocalizaAluno.Open;
dm.ClientLocalizaAluno.Active := true;
dm.SQLLocalizaAluno.ParamByName('id_aluno').AsInteger :=
dm.SQLLocalizar.FieldValues['id_aluno'];
end;
Atenciosamente,
Liana Gomes
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
