Error al intentar filtrar datagrid

[SeNdEr2003]

Buenas, quiero filtrar por nombre de empresa un datagrid, pero me tira error en este codigo (txtFiltro, es el txt que contiene la palabra para filtrar):

If txtFiltro <> "" Then
Datos.Recordset.Filter = "empresa LIKE '*" + txtFiltro + "*'" <---AQUI ME DA ERROR
Else
'Quitamos el filtro
Datos.Recordset.Filter = ""
Datos.Refresh
End If

Ademas quisiera saber como hacer para que en un datagrid no me aparezcan todos los datos que tiene la base al abrirlo, ya que se hace muy pesado y lento al tener muchos datos, sino que quisiera mostrar por ejemplo los ultimos diez, es posible esto?, como?

[GeoAvila]

Datos.Recordset.Filter = "empresa LIKE '*" + Cstr(txtFiltro.text) + "*'"

intenta así..

[SeNdEr2003]

Me da error en el record, que no se encuentra el miembro de datos...

[GeoAvila]

Iniciado por SeNdEr2003

Me da error en el record, que no se encuentra el miembro de datos...

seguro que estas conectando bien el recordset porque te esta diciendo que no encuentra empleados el campo empleados o bien no encuentra la tabla a la que estas dirigiendo la busqueda..

nos vemos...

[GeoAvila]

si podez colocar el trozo de codigo de la conexión y tambien el la parte donde abris el recordset sería mejor..

nos vemos..

[SeNdEr2003]

Ya logre hacerlo, con este codigo:

Private Sub txtFiltro_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

If txtFiltro <> "" Then
Adodc1.Recordset.Filter = "empresa LIKE '*" + txtFiltro + "*'"
Else

Adodc1.Recordset.Filter = ""
Adodc1.Refresh
End If


KeyAscii = 0
End If
End Sub

Gracias igual, ahora funciona...hago una pregunta, puedo tomar ese filtro y enviarlo al datareport para imprimir?, o sea que desde el txtFiltro.text tomar la palabra que busco y hacer un QUERY al datareport para que imprima solo el dato buscado?

Algo asi habia pensado pero dudo que sea correcto, pero logicamente algo asi quiero hacer:

SELECT * FROM tInmobiliaria WHERE tInmobiliaria.empresa = txtFiltro.text