Filtro Compuesto
Tengo un problema con un filtro compuesto. El filtro es el siguiente (realizado en ADO)
Filtro= ""
Filtro = Filtro & "Nombre_Cliente='" & Rst_Pedidos!
Nombre_Cliente & "' and "
Filtro = Filtro & "Fecha_Cerrada='" & Rst_Pedidos!Fecha_Cerrada & "'
and "
Filtro = Filtro & "Direccion_Envio='" & Rst_Pedidos!
Direccion_Envio & "'"
Rst_Pedidos_Mesa_Cerrada.Filter = Filtro
El problema es que me realiza el filtro sin ningun error, pero no me filtra ningun registro, cuando existen registros con las caracteristicas filtradas.
Pero lo raro es que cuando realizo el filtro de "Nombre_Cliente" con "Direccion_Envio", me filtra los registros que coinciden. Y cuando realizo el filtro unicamente de "Fecha_Cerrada", tambien me filtra los registros que coinciden.
Espero que me puedan ayudar o que me puedan decir que otro tipo de filtro se puede hacer, saludos Luciano.
Nota: El formato de fecha es por ejemplo ("12-08-2004 09:12:35 a.m.")
PD: Ya he probado al campo "Fecha_Cerrada" con el lsiguiente formato, y no me ha dado resultado el filtro.
Filtro = Filtro & "Fecha_Cerrada=#" & Format
(Rst_Pedidos_Mesa_Cerrada!Fecha_Cerrada, "m-d-yy
hh:mm:ss AMPM") & "# and "
Filtro= ""
Filtro = Filtro & "Nombre_Cliente='" & Rst_Pedidos!
Nombre_Cliente & "' and "
Filtro = Filtro & "Fecha_Cerrada='" & Rst_Pedidos!Fecha_Cerrada & "'
and "
Filtro = Filtro & "Direccion_Envio='" & Rst_Pedidos!
Direccion_Envio & "'"
Rst_Pedidos_Mesa_Cerrada.Filter = Filtro
El problema es que me realiza el filtro sin ningun error, pero no me filtra ningun registro, cuando existen registros con las caracteristicas filtradas.
Pero lo raro es que cuando realizo el filtro de "Nombre_Cliente" con "Direccion_Envio", me filtra los registros que coinciden. Y cuando realizo el filtro unicamente de "Fecha_Cerrada", tambien me filtra los registros que coinciden.
Espero que me puedan ayudar o que me puedan decir que otro tipo de filtro se puede hacer, saludos Luciano.
Nota: El formato de fecha es por ejemplo ("12-08-2004 09:12:35 a.m.")
PD: Ya he probado al campo "Fecha_Cerrada" con el lsiguiente formato, y no me ha dado resultado el filtro.
Filtro = Filtro & "Fecha_Cerrada=#" & Format
(Rst_Pedidos_Mesa_Cerrada!Fecha_Cerrada, "m-d-yy
hh:mm:ss AMPM") & "# and "
yo lo hago de esta forma con dos combos y un adodc
Dim strsql As String
strsql = "SELECT * FROM [nombre de tu tabla]"
strsql = strsql & " WHERE [tu primer registro] LIKE '" & Combo1.Text & "'"
strsql = strsql & " And [tu segundo registro] LIKE '" & Combo2.Text & "'"
lo que concuerde con los criterios lo agrego al adodc asi
Adodc1.RecordSource = strsql
adodc1.refresh
con esto LIKE '" & Combo1.Text & "'" busca exactamente el texto del combo en el registro
Dim strsql As String
strsql = "SELECT * FROM [nombre de tu tabla]"
strsql = strsql & " WHERE [tu primer registro] LIKE '" & Combo1.Text & "'"
strsql = strsql & " And [tu segundo registro] LIKE '" & Combo2.Text & "'"
lo que concuerde con los criterios lo agrego al adodc asi
Adodc1.RecordSource = strsql
adodc1.refresh
con esto LIKE '" & Combo1.Text & "'" busca exactamente el texto del combo en el registro
