30/05/2005, 08:25
|
| | | Fecha de Ingreso: noviembre-2003 Ubicación: Madrid
Mensajes: 109
Antigüedad: 21 años, 5 meses Puntos: 0 | |
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
__________________
Lo importante no es saber, sino tener el teléfono del que sabe :risa: |