Jump to content


Photo

Bajar archivo mediante FTP con Lazarus.


  • Please log in to reply
3 replies to this topic

#1 martinartaza

martinartaza

    Advanced Member

  • Miembros
  • PipPipPip
  • 159 posts
  • LocationArgentina, Tucuman

Posted 22 May 2012 - 04:34 PM

Hola que tal, el tema es el siguiente, quiero hacer un actualizador de versiones, por ende yo subo la version más reciente a un servidor FTP y quiero que el software se conecte al FTP y baje el archivo en una determinada carpeta donde tengo instalado la version anterior, el archivo que remplazarlo al anterior.

En este momento estoy tratando simplemente de conectarme a mi servidor ftp, y estoy googleando hace rato.
El probado el componente TIDFTP, le configura las propiedades:
usarname
Password
host
port
y luego en un boton pongo el codigo
idftp.connect;
Y me da el siguiente error.

El proyecto actualizarl.exe ha lanzado una excepcion 'EIdHostRequiredEIdHostRequired con el mensaje:

###(gdb unparsed remainder:s 0x0 out of baounds>)###


Bueno, la verdad que no se como seguir, sigo probando.

  • 0

#2 fredycc

fredycc

    Advanced Member

  • Moderadores
  • PipPipPip
  • 874 posts
  • LocationOaxaca, México

Posted 22 May 2012 - 07:13 PM

Pues yo solo uso algo como esto y funciona, checa si has inicializado tu variable correctamente:



delphi
  1.     FTP := TIdFTP.Create( nil );
  2.     FTP.Username := 'ftpuser';
  3.     FTP.Password := '1234567890';
  4.     FTP.Host := '192.168.0.1';
  5.     try
  6.         FTP.Connect;
  7.     except
  8.           FTP.Free;
  9.           raise Exception.Create( 'No se ha podido conectar con el servidor ' + FTP.Host );
  10.           Terminate;
  11.     end;
  12.  
  13.     FTP.ChangeDir( '/Updates/' );
  14.     FTP.List('*.ZIP',true);
  15.     .
  16.     .
  17.     .
  18.     FTP.Disconnect
  19.     FTP.Free


  • 0

#3 martinartaza

martinartaza

    Advanced Member

  • Miembros
  • PipPipPip
  • 159 posts
  • LocationArgentina, Tucuman

Posted 23 May 2012 - 12:45 PM

Muchas gracias, me funciona vi un codigo parecido en trucomania, lo estaba por probar cuando lei esto.
Sin embargo el lazarus no me encuentra el archivo IdFTP, pregunto: Te que agregar el directorio donde estas los archivos de indy al proyecto?

Desde ya muchas gracias.



  • 0

#4 fredycc

fredycc

    Advanced Member

  • Moderadores
  • PipPipPip
  • 874 posts
  • LocationOaxaca, México

Posted 23 May 2012 - 01:30 PM

Así es, ve a Proyecto -> Opciones del Proyecto -> Otros archivos de unidad (-Fu)

En el TextBox coloca las ruta(s) de tu carpeta donde tengas las Indy.

Saludos
  • 0




IP.Board spam blocked by CleanTalk.