IMPORTAR DE EXCEL A FOXPRO
Publicado por yomaira (9 intervenciones) el 27/01/2009 20:56:58
Alguien me puede colaborar estoy haciendo un boton que me importar un archivo de excel a foxpro.Cuando le doy importar me importar deberia llenar 5 campos y me llena 4 es decir que la informacion de un campo no me la lleva.
ESTE ES EL CODIGO QUE ESTOY UTILIZANDO
GCTABLA = " "
WFILEW = " "
GCTABLA =GETFILE('xls', 'Leer Archivo:', 'Abrir',0, 'Mostrar Archivos de excel')
DO CASE
CASE 'Informe' $GCTABLA
CREATE (GCTABLA)
CASE EMPTY(GCTABLA)
RETURN
OTHERWISE
WFILEW = GCTABLA
ENDCASE
use BAZAR excl in 0
select BAZAR
zap
wfileapp = "'" + alltrim(wfilew) + "'"
append from &wfileapp xls
MESSAGEBOX("importacion realizada con exito")
Me pueden decir que estoy haciendo mal
ESTE ES EL CODIGO QUE ESTOY UTILIZANDO
GCTABLA = " "
WFILEW = " "
GCTABLA =GETFILE('xls', 'Leer Archivo:', 'Abrir',0, 'Mostrar Archivos de excel')
DO CASE
CASE 'Informe' $GCTABLA
CREATE (GCTABLA)
CASE EMPTY(GCTABLA)
RETURN
OTHERWISE
WFILEW = GCTABLA
ENDCASE
use BAZAR excl in 0
select BAZAR
zap
wfileapp = "'" + alltrim(wfilew) + "'"
append from &wfileapp xls
MESSAGEBOX("importacion realizada con exito")
Me pueden decir que estoy haciendo mal
Valora esta pregunta
0