Hola a todos. He hecho una redefinición de uncontrol ADO que únicamente lo utilizo para controlar otro objeto LISTVIEW....
Redefino y hago una consulta sin condiciones (where) y me carga bien los datos.....
el problemaviene cuando quiero seleccionar los datos que tenga del día de hoy (date) que no me recoge nada y la lista se queda en blanco...
creo que el problema lo tengo en la redefinición .. os pongo el codigoy a ver ....
La cláusula Where está comentada. A ver si el problema está en esta condición .
Gracias de antemano
---------------------------- Código ----------------------------------------------
-------------------------------------------------------------------------------------
'Carga del ADO que controla los datos de los pacientes del ListView
With adolist
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\EMP.mdb;Persist Security Info=False "
.CommandType = adCmdText
.RecordSource = "SELECT alumnos.DNI, alumnos.Nombre, alumnos.Apellidos, enfermedad.codigo, enfermedad.tipo, tiene.estado, tiene.dia " & _
"FROM enfermedad INNER JOIN (alumnos INNER JOIN tiene ON alumnos.DNI = tiene.DNI) ON enfermedad.codigo = tiene.enfermedad " ' & _
'"WHERE (((tiene.dia)=" & Date & "))"
.Refresh
End With