Guardar un archivo en sitio web

[[newtron]]

Hola.

Aquí tienes un ejemplo de envío de un fichero a un servidor ftp usando el componente idFTP:

Código Delphi [-]
         IdFTP1.Host:= NombreDelHost;
         IdFTP1.UserName := NombreUsuario;
         IdFTP1.Password := Password;
         Try
           IdFTP1.Connect;
         except
           ShowMessage('¡ATENCION! Problema de conexion, fichero no enviado');
           Exit;
         end;
         IDFTP1.TransferType:=ftBinary;
         IDFTP1.ChangeDir('CarpetaDestino'); // Ruta fichero destino
         Try
           IDFTP1.Put('C:\RutaOrigen\NombreArchivoOrigen','NombreArchivoDestino');
         except
           ShowMessage('ATENCION! Problema al enviar el archivo');
         end;

Espero que te sirva.
Saludos