CARREGA MSHFLEX COM CLIK
Pessoal to tentando fazer com que na hora que o txtProd.Text recebe Focus ele execute a ação abaixo
Private Sub txtProd_Change()
[ô]carregando o recordset com campos desejados da tabela
cnn.CursorLocation = adUseClient
With cmd
.ActiveConnection = cnn
.CommandType = adCmdText
.CommandText = [Ô]SELECT Codigo, Nome, Endereco, Bairro FROM TFuncionario WHERE Nome LIKE [ô] + MSHFlexGrid1.Row, 2 + [ô] order by Codigo[Ô]
Set rs3 = .Execute
End With
[ô]carregando o Mshflex com o recordset
With rs3
Set MSHFlexGrid2.DataSource = rs3
End With
sub_Ajuda_Grid2
End Sub
mas não preenche com o resultado da comparação da Select acima.
A moral do negocio é que na hora que a pessoa clicar no nome do cliente ele preenche o txtProd com o mesmo que tem no MSHFlexGrid1 Row 2 e na hora que o txtProd recebe o Focu ele executa essa select que ta acima trazendo somente os resultados que a select ta fazendo sobre o cliente e preenchendo o MSHFlexGrid2
Ajuda aee pessoal.
Qualquer coisa montei um projetinho modelo que tenta fazer essa proesa acima.mas não aqui não aceita anexar zip ou rar deixe seu email que eu envio pra vcs darem uma olhada no projetinha ..
Dá uma olhada no projeto alterado.
caraca meu é isso mesmo Valu mesmo Muitissimo obrigado
tava na cara o erro vixxi ..hehehe
brigadão.
tava na cara o erro vixxi ..hehehe
brigadão.
Tópico encerrado , respostas não são mais permitidas