Importar hoja de excel a tabla (.dbf) de foxpro

Saludos. A veces  necesitamos importar un documento de excel a una tabla fisica (.dbf) o un cursor temporal de foxpro. Una forma practica de hacerlo es asi:

1.  Debemos, primeramente, tener en cuenta que el archivo de excel debe estar guardado en formato 5.0. Para esto, escogemos la opcion 

Libro de Microsoft Excel 5.0/95 (*.xls)

2.  Debemos tener en cuenta tambien que la etructura de la hoja de calculo debe ser similar a la de la tabla, en el sentido que si una de las columnas de excel almacena datos de fecha, el campo donde dichos datos seran guardados, debe ser tipo DATE.

3. Copiamos el siguiente codigo (en un boton [click] , por ejemplo):

LOCAL lcXlsArchivo

   
lcXlsArchivo = GETFILE('xls','Nombre:','Abrir',0 ,'Abrir Archivo de Planilla de Excel')

**--Si cancelamos la apertura
IF EMPTY(lcXlsArchivo)
    RETURN .F.
ENDIF
   
**--Si abrimos archivo, guardamos en cursor

SELECT personaltemp

APPEND FROM (xarchivo) TYPE XLS



Y listo. Ya tenemos un cursor guardado con datos de una hoja de excel 5.0 :)



SALUDOS! Desde Managua, Nicaragua! Raven :D