SQL Server - Mostrar mensaje o barra animada con stored

Hola queria consultarlos por el siguiente problema que tengo. Desde VB6 con un objeto conexion de ADO metodo execute ejecuto un stored procedure de SQL2000. Este demora en concluir dependiendo de la cantidad de registros que procesa. Puede tardar 2 minutos como 1 hora o mas. Lo que necesito es colocar algun mensaje o barra animada para que el usuario no crea que la aplicacion se ha colgado. He probado algunas cosas pero sin resultados positivos.
Muchas gracias

¿UNA HORA O MAS?, digo, ya que se tarde mas de 30 segundos es DEMASIADO TIEMPO, ¿No sera que necesitas pulir mas tu STORE PROCEDURE?

En esos casos yo uso el control ProgressBar. Es facil de usar. solo le pones pb_Proceso.Max = rs.RecordCount, y luego aumentas su valor pb_Proceso.Value = pb_Proceso.Value + 1.
Cambiando de tema, me parece que tu query demora demasiado.
Haz una prueba copiando lo necesario a una BD temporal y ejecuta ahi te consulta.
Suerte!