Prezados colegas!
Estou tentando criar uma consulta com base no valor escolhido no formulário principal.
A idéia é que a consulta seja realizada ao clicar duas vezes no campo "nnf" e utilizar o valor do campo como filtro.
O código que estou utilizando é esse:
Dá erro de sintaxe na clausula " FROM"
Desde já, agradeço a ajuda dos colegas imensamente!!
Estou tentando criar uma consulta com base no valor escolhido no formulário principal.
A idéia é que a consulta seja realizada ao clicar duas vezes no campo "nnf" e utilizar o valor do campo como filtro.
O código que estou utilizando é esse:
- Código:
Private Sub fncFiltro()
Dim qry As QueryDef
Dim strSQl As String
Set qry = CurrentDb.QueryDefs("DadosFormNFE")
strSQl = strSQl & " SELECT * from PARTE01NF, * from ProdutosNF FROM PARTE01NF INNER JOIN ProdutosNF ON PARTE01NF.nnf = ProdutosNF.nNF"
strSQl = strSQl & " WHERE PARTE01NF.nnf =" & Forms!Lista!SUBXML!nnf
strSQl = strSQl & " GROUP BY PARTE01NF.nnf"
strSQl = strSQl
qry.SQL = strSQl
Set qry = Nothing
End Sub
Dá erro de sintaxe na clausula " FROM"
Desde já, agradeço a ajuda dos colegas imensamente!!
- Anexos
BD XML.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (826 Kb) Baixado 16 vez(es)