Descarga FTP

[Luis Alberto]

Gracias a todos su ayuda me sirvio mucho gracias...

[Luis Alberto]

Me surgio una duda para hacer lo contrario en vez de bajar todo lo que este en la carpeta que debo de hacer para subir todo lo que este en una carpeta local al ftp y la ruta que tengo?

[[Bicho]]

Pues en lugar de usar la función Get usas la función Put

Dale un vistazo a la ayuda de Delphi referente al Put y a Get.

Saludos

[Luis Alberto]

Me podrias explicar por que no sale, gracias de antemano

[[Bicho]]

Que es lo que no te sale?? Explicate la ayuda de Delphi y la función Put, danos más información para que podamos ayudarte.
De todos modos si has seguio las instrucciones para hacer el Get como te indiqué no tendrías que tener ningún problema, sólo substituirlo por el Put.

Saludos

[Luis Alberto]

Mira realmente mi pregunta es yo tengo los archivo en mi maquina local una carteoa llamada TXT que se encuentra en C:\TXT\dentro de ella aqui estan los archivos que quiero que automaticamente se tomen cada hora si hay archivos que los tome todos los que haya. el detalle es que el archivo tienen difierente nombre pero si son TXT todos quiero ver como realizar esto espero me puedan ayudar...

Saludos...

[[Bicho]]

Puedes usar componentes del tipo TreeView, FileListBox de la paleta de Win 3.1, ShellTreeView de la paleta Samples, etc. Para poder listar los ficheros de un directorio.

Te doy un ejemplo con el FileListBox:

Código Delphi [-]
    FileListBox1.Mask := '*.TEXT'; //máscara para filtrar por extension txt
    FileListBox1.Directory := 'c:\TXT\'; //directorio donde buscar los ficheros
    FileListBox1.Update; //actualiza el contenido del objeto

Ya sólo te queda recorrer el FileListBox accediendo a sus items

Código Delphi [-]
FileListBox1.Items.Strings[x]

y para cada fichero encontrado lo subes con la función Put que te enseñé más arriba.

Saludos