PROBLEMA -EVITAR EL ERROR
Publicado por AV (40 intervenciones) el 11/10/2005 13:55:08
Mi problema se presenta cuando estando parado en el " APPEND FROM ? " presiono la tecla CANCELAR, en este caso me da un error "ERROR del PROGRAMA", "EL ARCHIVO NO EXISTE".
Lo que estoy haciendo es:
* 1 - Creo el cursor donde grabare lo levantado del Archivo Excel
CREATE CURSOR Cur(art n(9,0))
* 2 - Obtengo información de Archivo Excel
SELECT Cur
APPEND FROM ? FIELDS art TYPE XLS
Tambien Probe :
vs_path = GETFILE('XLS')
IF EMPTY(vs_path)=.t.
RETURN
ENDIF
APPEND FROM vs_path FIELDS art,des,cos,arp,prv,rs TYPE XLS
Lo que estoy haciendo es:
* 1 - Creo el cursor donde grabare lo levantado del Archivo Excel
CREATE CURSOR Cur(art n(9,0))
* 2 - Obtengo información de Archivo Excel
SELECT Cur
APPEND FROM ? FIELDS art TYPE XLS
Tambien Probe :
vs_path = GETFILE('XLS')
IF EMPTY(vs_path)=.t.
RETURN
ENDIF
APPEND FROM vs_path FIELDS art,des,cos,arp,prv,rs TYPE XLS
Valora esta pregunta
0