AJUDA SQL
Preciso que um combo box receba o nome de um banco. Porém eu estou realizando dois select um na tabela ger001 que armazeno o codigo em uma recordset e depois eu busco na tabela de bancos so que para buscar o nome do banco
Esta assim:
If Not IsNull(oRecOp.Fields([Ô]ContaParaLancarRet[Ô])) Then
DBCombo4.Text = [Ô]Select nome from ger007 where codigo=[ô][Ô] & oRecOp.Fields([Ô]ContaParaLancarRet[Ô]) & [Ô][ô][Ô]
End If
Não consigo trazer o nome do banco para o combo.
Poderiam me ajudar?
Obrigado
Esta assim:
If Not IsNull(oRecOp.Fields([Ô]ContaParaLancarRet[Ô])) Then
DBCombo4.Text = [Ô]Select nome from ger007 where codigo=[ô][Ô] & oRecOp.Fields([Ô]ContaParaLancarRet[Ô]) & [Ô][ô][Ô]
End If
Não consigo trazer o nome do banco para o combo.
Poderiam me ajudar?
Obrigado
vc precisa fazer a consulta em separada, ae depois vc percorre o resultado e popula a combo. algo como:
rs.open [Ô]select bla bla..[Ô]
rs.open [Ô]select bla bla..[Ô]
Citação:while not rs.eof
combo.additem rs([Ô]seucombo[Ô])
rs.movenext
Bom entendi mais ou menos o que você disse acima.
Porém eu queria ver se tem uma maneira de fazer algo como o exemplo que postei na pergunta.
If Not IsNull(oRecOp.Fields([Ô]ContaParaLancarRet[Ô])) Then
DBCombo4.Text = [Ô]Select nome from ger007 where codigo=[ô][Ô] & oRecOp.Fields([Ô]ContaParaLancarRet[Ô]) & [Ô][ô][Ô]
End If
Onde o DBCombo4 recebe o valor de um select onde o código está na recordset oRecOp.Fields([Ô]ContaParaLancarRet[Ô])
Porém eu queria ver se tem uma maneira de fazer algo como o exemplo que postei na pergunta.
If Not IsNull(oRecOp.Fields([Ô]ContaParaLancarRet[Ô])) Then
DBCombo4.Text = [Ô]Select nome from ger007 where codigo=[ô][Ô] & oRecOp.Fields([Ô]ContaParaLancarRet[Ô]) & [Ô][ô][Ô]
End If
Onde o DBCombo4 recebe o valor de um select onde o código está na recordset oRecOp.Fields([Ô]ContaParaLancarRet[Ô])
colega posta a estrutura das duas tabelas pra gente ex:
Tabela A
campo1
campo2
campo3
TabelaB
campo1
campo2
campo3
consultar
tabelaB onde o campo2 é igual ao campo1 da tabelaA
assim fica mais fácil de se criar a query, uma unica exibindo os dados no combo.
porem usando um datacombo, o que a maioria de nós não costuma usar, você se não me engano deverá colocar a query no datasource do datacombo, e não no text como vc fez
.
Tabela A
campo1
campo2
campo3
TabelaB
campo1
campo2
campo3
consultar
tabelaB onde o campo2 é igual ao campo1 da tabelaA
assim fica mais fácil de se criar a query, uma unica exibindo os dados no combo.
porem usando um datacombo, o que a maioria de nós não costuma usar, você se não me engano deverá colocar a query no datasource do datacombo, e não no text como vc fez
.
Marcelo-Treze a estrutura é a Seguinte
tabela ger001
Campo ContaParaLancarRet
Tabela Ger007
Campo Codigo, Nome
Tabela ger007 onde o campo Codigo é igual ao campo da Ger001 ContaParaLancarRet.
Quero trazer o nome onde o campo da tabela ger001 for igual ao Codigo da Tabela ger007.
Compreende?
tabela ger001
Campo ContaParaLancarRet
Tabela Ger007
Campo Codigo, Nome
Tabela ger007 onde o campo Codigo é igual ao campo da Ger001 ContaParaLancarRet.
Quero trazer o nome onde o campo da tabela ger001 for igual ao Codigo da Tabela ger007.
Compreende?
Você tem que ler algo sobre relacionamento entre tabelas.
Ai conseguirá fazer sua consulta e obter seus resultados.
Caso não consiga,o pessoal vai te responder.
Não leve mal.
Ai conseguirá fazer sua consulta e obter seus resultados.
Caso não consiga,o pessoal vai te responder.
Não leve mal.
é assim
porém acredito que vc terá de colocar esta query no recordsource do DBCombo4 e não no text como vc colocou
teste ai
[Ô]Select g1.ContaParaLancarRet, g7.codigo,g7.nome from ger007 g7 INNER JOIN ger0001 g1 ON g7.Codigo = g1.ContaParaLancarRet[Ô]
porém acredito que vc terá de colocar esta query no recordsource do DBCombo4 e não no text como vc colocou
DBCombo4.RecordSource = [Ô]Select g1.ContaParaLancarRet,g7.codigo,g7.nome from ger007 g7 INNER JOIN ger0001 g1 ON g7.Codigo = g1.ContaParaLancarRet[Ô]
teste ai
Vou encerrar o Tópico.
Com a Ajuda e conselhos de todos acima consegui resolver. Obrigado.
Marcelo Treze Valew novamente
Com a Ajuda e conselhos de todos acima consegui resolver. Obrigado.
Marcelo Treze Valew novamente
Tópico encerrado , respostas não são mais permitidas