Busqueda en Acces
Como puedo hacer una busqueda de Datos en Access mas rapido que utilizando,
Data1.recordset.movefirst ó Data1.recordset.Findnext
Ya que la base de Datos a Consultar, contiene 12.000.000 de Registros..
De antemano gracias....
Data1.recordset.movefirst ó Data1.recordset.Findnext
Ya que la base de Datos a Consultar, contiene 12.000.000 de Registros..
De antemano gracias....
UTILIZA ESTA RUTINA A MI ME FUNCIONO
Set dbBase = OpenDatabase(App.Path & "" & "bd2.mdb")
Set rstVendedor = dbBase.OpenRecordset("productos")
rstVendedor.Index = "clave"
rstVendedor.Seek "=", Text12
If rstVendedor.NoMatch Then
Set dbBase = OpenDatabase(App.Path & "" & "bd2.mdb")
Set rstVendedor = dbBase.OpenRecordset("productos")
rstVendedor.Index = "clave"
rstVendedor.Seek "=", Text12
If rstVendedor.NoMatch Then
Porque no utilizas una instrucción SQL,de la siguiente forma:
Data.recorsource="select (campos de la tabla,si son todos pon *) from nombre tabla (a continuacion la condicion).Puede ser where nombre campo = algo
A continuación de esto tienes que poner data.refresh
Data.recorsource="select (campos de la tabla,si son todos pon *) from nombre tabla (a continuacion la condicion).Puede ser where nombre campo = algo
A continuación de esto tienes que poner data.refresh
