SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: FABIANGARCIA en Jueves 30 de Septiembre de 2004, 21:03

Título: Procesando
Publicado por: FABIANGARCIA en Jueves 30 de Septiembre de 2004, 21:03

:angry:  :angry:  :angry:

HOLA A TODOS

ESTOY REALIZANDO UNA CONSULTA EN UNA BASE DE DATOS GRANDE, COMO HAGO PARA QUE ME APARESCA UN TEXTO O UN PROGRESS CUANDO EL RECORSET ESTA REALIZANDO LA CONSULTA, A MI SE ME QUEDA CONGELADO EL FORM Y NO ME MUESTRA NADA, E BUSCADO POR TODO LADO Y ME MUESTRA EJEMPLOS MUY SENCILLOS PERO NINGUNO CON UNA CONSULTA CON UN RECORDSET.

GRACIAS

Título: Re: Procesando
Publicado por: Cyclop en Viernes 1 de Octubre de 2004, 02:37

Es por que lo haces con un While o For, prueba usando un Timer, pero el problema de esto es que se hace un poco lento.

Salu2

Cyclop

Título: Re: Procesando
Publicado por: FABIANGARCIA en Viernes 1 de Octubre de 2004, 15:22

HOLA CYCLOP

SI YA HABIA HECHO ESO, SABES HICE UN FORM PEQUEÑO QUE LE ESCRIBI EL MENSAJE, LO MONTO EN EL MOMENTO DE REALIZAR LA CONSULTA Y CUANDO ACABA LA CONSULTA LO BAJO Y ASI ME APARECE EL MENSAJE

DE TODOS MODOS MUCHAS GRACIAS

 :hola:  :hola:  :hola:  :hola:

Título: Re: Procesando
Publicado por: Jose Arriagada en Viernes 1 de Octubre de 2004, 15:36

Antes de hacer la consulta, coloca

Me.MousePointer = vbHourglass
'A continuacion tu consulta, y tus procesos

Al terminar, coloca
Me.MousePointer = vbDefault

Con esto, al menos tendras la idea que esta trabajando

Lo otro, es que tengas un contador de eventos, y simplemente en tu
proceso le pongas

cont=cont+1
me.caption="Evolucion " & cont

Espero te tinque