Cita:
Iniciado por LOCOX73 agluien me podria decir que pasa que este codigo no filtra nada
Private Sub cmdbuscar_Click()
Adopract.RecordSource = "SELECT cod_presctacion,descripcion FROM inos WHERE (cod_prestacion = '42.01.01' )"
end sub
la base de datos se llama "INOS" y la tabla tammbien
la tablka tiene 3 campos cod_prestacion, descripcion y precio
graicas
haz un refresh después de la consulta:
Código:
Private Sub cmdbuscar_Click()
Adopract.RecordSource = "SELECT cod_presctacion,descripcion FROM inos WHERE (cod_prestacion = '42.01.01' )"
Adopract.Refresh
End Sub