Appe From Excel
Publicado por Eduardo (123 intervenciones) el 13/08/2007 02:03:30
Hola amigos, tengo un problema cuando quiero pasar un archivo excel a una DBF.
Lo raro es que lo hago en varios procesos sin problemas, pero el siguiente me da un error fatal:
CREA CURSOR INGPOL;
(POLIZA C(13), EMISION C(10), ASEGURADO C(60), DIRCOBRO C(60), UBICACION C(60), COMPANIA C(20), BIEN C(60), PLAN C(60), SUMA C(10), DESDE C(10), HASTA C(10), OPERACION C(60))
xarchivo=GETFILE('xls','Archivo de Excel','Abrir',1,'Seleccione el archivo de Excel a importar')
IF EMPTY(xarchivo)
return .F.
ENDIF
sele ingpol
APPEND FROM (xarchivo) TYPE XLS
Gracias por su ayuda
Saludos
Eduardo
Lo raro es que lo hago en varios procesos sin problemas, pero el siguiente me da un error fatal:
CREA CURSOR INGPOL;
(POLIZA C(13), EMISION C(10), ASEGURADO C(60), DIRCOBRO C(60), UBICACION C(60), COMPANIA C(20), BIEN C(60), PLAN C(60), SUMA C(10), DESDE C(10), HASTA C(10), OPERACION C(60))
xarchivo=GETFILE('xls','Archivo de Excel','Abrir',1,'Seleccione el archivo de Excel a importar')
IF EMPTY(xarchivo)
return .F.
ENDIF
sele ingpol
APPEND FROM (xarchivo) TYPE XLS
Gracias por su ayuda
Saludos
Eduardo
Valora esta pregunta


0