Rodolfo:

I answer to you in the VFP Spanish forum with an example.
The idea is to capture the messages that VFP shows in the status bar when it is indexed, for example

USE myTable EXCLUSIVE
DEFINES WINDOW myWindow FROM 1,1 TO 1,40 TITLE "Records: " + STR(RECCOUNT())
SET TALK ON
SET TAL WINDOW  myWindow
SHOW WINDOW myWindow

Your index code.

RELEASE WINDOW myWindow
SET TALK OFF

Ricardo._

>Hola a Todos ,
>
>Estoy creando un formulario donde quiero generar indices a las bases de datos del sistema, he logrado conseguir un Progress Bar pero no logro
>conseguir lo que quiero
>
>Esta barra de progreso se ejecuta teniendo como parametro el Recno()
>en mi caso no conozco alguna funcion o comando que pueda usarlo con el
>comando Index .
>
>La idea es :
>
>use orders excl
>pack
>index on num_invoice tag facturas
>Mostrar Progress Bar con el Avance
>index on cod_cliente tag clientes
>Mostrar Progress Bar con el Avance
>
>No se si tu tienes alguna clase que permita realizar esto .
>
>De antemano te agradezco por tu ayuda .
>
>Saludos
>
>
>Rodolfo