ejecutar Recordset se vuelve lento |
Responder |
Autor | |
escoper45
Habitual Unido: 06/Junio/2010 Localización: Mexico Estado: Sin conexión Puntos: 52 |
Tema: ejecutar Recordset se vuelve lento Enviado: 11/Febrero/2020 a las 00:42 |
buenas tarde tengo este codigo que compra 2 tablas diferentes Tbl_ComprasDet compara con apartadosCOtiCompra compara si el codigo es igual y tiene una cantidad que lo agrege ala tabla Tbl_ComprasDet lo hace pero se tarda mucho en mas de 50 registro Dim numeroA As String |
|
Escoper
Soporte Tecnico |
|
Maverick2019
Habitual Unido: 10/Junio/2019 Localización: Madrid Estado: Sin conexión Puntos: 145 |
Enviado: 11/Febrero/2020 a las 10:32 |
Hola
Quizás tenga mejor rendimiento sí haces un ForwardOnly y por cada registro ejecutas una query de actualización. Por supuesto, el recordset readonly para evitar bloqueos. Salu2,
|
|
javier.mil
Ver perfil usuario
Enviar mensaje privado
Ver los mensajes del usuario
Visite la página de los usuarios
Añadir a la lista de amigos
Colaborador Unido: 10/Agosto/2005 Localización: España Estado: Sin conexión Puntos: 4812 |
Enviado: 11/Febrero/2020 a las 20:07 |
Ademas de lo ya comentado como la forma de apertura de la tabla tambien hay algunas funciones que también pueden hacer ralentizar el código Me.Refresh ' << Primer Refresh es necesario ? rs.MoveFirst ' << Se podria suprimir Do While Not rs.EOF ' << Puedes sustituitala (mira el enlace de abajo) DCount ' << Deberias plantearte cambiarla .... Me.Refresh ' << Ultimo Refresh es necesario ? Pegale un vistazo aqui |
|
guarracuco
Moderador Unido: 24/Abril/2004 Localización: EEUU Estado: Sin conexión Puntos: 3239 |
Enviado: 15/Febrero/2020 a las 08:14 |
Con una instrucción sql puedes hacerlo. La he escrito al vuelo, desde un dispositivo mobil, así que dudo funcione de primera. update tbl_comprasdet cdet
set cdet.qtdeapar ( select acc.catapartado from apartadoscoticompra acc where cdet.codproducto = acc.nopieza And acc.catapartado>0); |
|
guarracuco
Moderador Unido: 24/Abril/2004 Localización: EEUU Estado: Sin conexión Puntos: 3239 |
Enviado: 15/Febrero/2020 a las 08:16 |
Copiala y pegarla en el editor de consultas para probarla. Luego busca como ejecutar una consulta. Quizás debas cambiar el criterio >0 por not is null ( or is not null, en este momento estoy inseguro cual es para vba)
Editado por guarracuco - 15/Febrero/2020 a las 08:18 |
|
Responder | |
Tweet
|
Ir al foro | Permisos de foro Usted No puede publicar nuevos temas en este foro Usted No puede responder a temas en este foro Usted No puede borrar sus mensajes en este foro Usted No puede editar sus mensajes en este foro Usted No puede crear encuestas en este foro Usted No puede votar en encuestas en este foro |