In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

TFTP algunos clientes no descargan

Foro de Xailer profesional en español
Responder
Avatar de Usuario
XeviCOMAS
Mensajes: 593
Registrado: Sab Mar 12, 2011 8:16 pm

TFTP algunos clientes no descargan

Mensaje por XeviCOMAS »

El tema de descarga para actualizaciones lo estoy haciendo via FTP.
El caso es que hay algunos clientes que no llegan a descargar el archivo, es como si se les bloqueara la descarga del archivo zip que tengo alojado en mi FileZilla.

En el FileZilla veo que "entra" la petición de conexion, pero el terminal de mi cliente se queda "bloqueado" un par de minutillos, supongo esperando respuesta del servidorFTP.

¿Puede deberse al FireWall??? Antivirus???

¿Como podria "salvar" ese contratiempo???

Lo estoy utilizando así...

Código: Seleccionar todo

PROCEDURE xDownload( Self, cRemoteFile, cLocalFile )
   Local cServer := miIP_DynDNS
   LOCAL nBuffer := 32 * 1024
   LOCAL cBuffer := Space( nBuffer )
   LOCAL hRemote, hFile

   Application:lBusy := .T.
   ::lEnabled := .F.

   WITH OBJECT TFTP():Create()
   :cUser      := "miUser"
   :cPassword  := "miPass"

   IF :Open() .and. :Connect( cServer ) .and.;
      (hRemote := :OpenFile( cRemoteFile ) ) > 0 .and. (hFile := FCreate( cLocalFile )) > 0
      WHILE :ReadFile( hRemote, @cBuffer, nBuffer )
         FWrite( hFile, cBuffer )
         TRY; ::oProgressBar1:nValue += Len( cBuffer ); CATCH; END
      END
      :CloseFile( hRemote )
      FClose( hFile )
   ENDIF
   :Destroy()
   END

   ::lEnabled := .T.
   Application:lBusy := .F.

RETURN

¿Hay alguna manera de hacer la conexion/descarga FTP de otra forma (con seguridad) que no lo obstaculize el Antivirus o el Cortafuegos??


Gracias.
Un Saludo,
Xevi.
Avatar de Usuario
jfgimenez
Site Admin
Mensajes: 5718
Registrado: Lun Abr 06, 2015 8:48 pm
Contactar:

Re: TFTP algunos clientes no descargan

Mensaje por jfgimenez »

Xevi,

si el fichero es público, es decir, que puedes descargarlo con una URL sin contraseña, entonces es mejor utilizar la clase TAsyncFileDownload. Esta clase te permite descargar en segundo plano, y lo hace por HTTP en vez de FTP. Y probablemente será más fácil que el cortafuegos o el antivirus deje pasar una conexión HTTP (o al menos que pregunte al usuario), antes que una conexión FTP.

Por si te sirve de referencia... yo tengo siempre la última versión de cada uno de mis programas en la web, que cualquiera puede descargar como DEMO (deja de ser demo al registrarlo y activarlo, vamos, parecido a Xailer). Por lo tanto, el fichero de instalación es público, y lo descargo desde el mismo programa con la clase TAsyncFileDownload. Una vez que ha terminado de descargar, le muestro un aviso al usuario, y sólo tiene que hacer clic en un botón para salir del programa y lanzar la instalación.
José F. Giménez
[Equipo de Xailer / Xailer team]
http://www.xailer.com
http://www.xailer.info
Avatar de Usuario
XeviCOMAS
Mensajes: 593
Registrado: Sab Mar 12, 2011 8:16 pm

Re: TFTP algunos clientes no descargan

Mensaje por XeviCOMAS »

Jose,

Voy a intentar descargar de FTP, también con TAsyncFileDownload

Gracias.

Editado...

Releyendo el mensaje, y con alguna prueba de TAsyncFileDownload, entiendo que dices que en lugar de la descarga hacerla por mi servidor FTP, sea por web, por archico compartido a partir de una URL... Drive, por ejemplo.

Lo que estoy intentando por el otro hilo abierto, y sin lograr hacerlo funcionar con TAsyncFileDownload.
Un Saludo,
Xevi.
Responder