Como subir un txt con Getfile
Publicado por Marcelo (70 intervenciones) el 27/09/2012 00:32:01
Hola a todos....tengo la siguiente duda, tengo un formulario en el cual busco un archivo txt que quiero subir a una tabla, cree un formulario con un campo de texto y 2 botones uno para buscar el archivo txt y mostrarlo en el campo de texto y el segundo boton es para subir los registros a la tabla. El problema es que una vez que encuentra el archivo me da error cuando trato de subirlo con el segundo boton. Asi tengo el codigo
Boton 1 (busca el txt)
xarchivo=GETFILE('TXT')
thisform.txtddo.Value = xarchivo && muestro la ruta y el nombre del txt en el campo de texto
Boton 2 (Sube el txt a la tabla)
USE 'c:\programa\fesub\bdatos\mi_tabla.dbf'
APPEND FROM xarchivo DELIMITED
Aqui me sale el error de que el archivo no existe. Ojala me puedan ayudar
Gracias de antemano.
Boton 1 (busca el txt)
xarchivo=GETFILE('TXT')
thisform.txtddo.Value = xarchivo && muestro la ruta y el nombre del txt en el campo de texto
Boton 2 (Sube el txt a la tabla)
USE 'c:\programa\fesub\bdatos\mi_tabla.dbf'
APPEND FROM xarchivo DELIMITED
Aqui me sale el error de que el archivo no existe. Ojala me puedan ayudar
Gracias de antemano.
Valora esta pregunta


0