Bom dia, tenho uma consulta com período de data e nome do devedor, mas preciso de acrescentar nessa consulta um outro campo e não estou consequindo.
a que eu tenho é assim:
'**********************************
On Error Resume Next
Data1.RecordSource = "SELECT * FROM ContasAReceber WHERE NomeDevedor Like '*" & Nome.Text & "*' AND DtCadastro BETWEEN #" & _
Format(DtInicial, "yyyy/mm/dd") & "# and #" & Format(DtFinal, "yyyy/mm/dd") & _
"# order by Vencimento"
Data1.Refresh
'***************
Porém tentei fazer da seguinte forma mas nao deu certo:
'********************************
On Error Resume Next
Data1.RecordSource = "SELECT * FROM ContasAReceber WHERE NomeDevedor Like '*" & Nome.Text & "*' and Serviços Like '*" & "PERIÓDICO" & "*' AND DtCadastro BETWEEN #" & _
Format(DtInicial, "yyyy/mm/dd") & "# and #" & Format(DtFinal, "yyyy/mm/dd") & _
"# order by Vencimento"
Data1.Refresh
'**********************
Obs.: o que está em negrito é que pretendo acrescentar na consulta.
Desde já agradeço a todos..
Luciano.