Quiero ejecutar esta sentencia:


sql = "select * from pdi where nombre like '*" & Text1.Text & "*' order by nombre asc"
Adodc1.RecordSource = sql
Adodc1.Refresh


... y no me da resultados. El problema lo tengo en los asteriscos.


Por otro lado, quiero eliminar los registros con:


Adodc1.RecordSource = "delete * from pdi"
Adodc1.Refresh


pero me dael error "la operación no está permitida si el objeto está cerrado. Termino la aplicación, la vuelvo a abrir y resulta que se habían borrado los registros.


¿Qué puede pasar?

El problema de los asteriscos es sencillo, ya que quieres realizar una
busqueda por patrones reemplaza los * por % y siempre la misma sintaxis
de tal forma que el resultado final sea



select *from pdi where (nombre like '%casa%') order by nombre asc



donde casa puede ser el texto que contenga el objeto text1.