Busqueda con Like

Hola al grupo, estoy haciendo una busqueda en mi base de datos y el

es que va demasiada lenta.Utilizo MsAccess2000 y la sentencia para buscar

ThebeCon.Open = "myDSN"
Set ThebeRs = Server.CreateObject("ADODB.Recordset")
With ThebeRs
.Source = "SELECT * FROM datos WHERE Nombre LIKE '%"&AuxIdKey&"%'Order

Nombre,Ape;"
.ActiveConnection = ThebeCon
.Cursortype = AdOpenStatic
.LockType = adLockOptimistic
.Open
end With

Recojo AuxIdKey por medio de QueryString,¿Habria Alguna manera de

la busqueda y que fuera mas rapida? la BBDD se compone de 1789 registros y
solo busco por un campo txt (nombre).Muchas gracias por vuestro tiempo.Un
Saludo

Manolo