OT. ¿ Que bloquea mi Ftp ? (SOLUCIONADO)

[hmpaquito]

Hola a todos,

Con el antivirus y el firewall desconectados:
Tanto desde fwh como abriendo el sitio ftp desd el explorer.exe con un acceso directo conteniendo [url]%windir%explorer.exe ftp://links:pass@test.exavault.com[/url] el acceso a ftp me falla.
Si utilizo filezilla si funciona. Lo hago en otro ordenador, bajo el mismo router y tambien funciona. Pero ¿ que puede estar impidiendo el acceso a ftp

Asi que pareciera que el problema esta cuando se accede desde fwh o el explorer, pero no si se accede desde filezilla o similar.

A ver si alguien fuera tan amable de indicarme por donde puede estar el problema.

Saludos

[groiss]

Hola:

¿Has probado, ejecutando el programa como administrador?
Un saludo
José Luis

[Baxajaun]

Hola hmpaquito,

aquí

Code: Select all  Expand view

%windir%/explorer.exe ftp://links:pass@test.exavault.com

funciona sin problemas, con antivirus y cortafuegos activado en el equipo. Y con el cortafuegos corporativo perimetral activado.

Saludos

[hmpaquito]

Hola,

Jose Luis,

Si estoy todo el tiempo como administrador.
Probando cosas he abierto una sesion de telnet con telnet ftp.sitio.com 21, lo cual demuestra al menos que el puerto 21 esta operativo.

Baxajaun,

Si, a mi me funciona tambien, pero desde otro ordenador. Lo que queria decir es que ese ftp no me funciona desde este ordenador (que escribo), aunque con filezilla si me funciona.
Es decir, no me funciona en un ordenador y solo no me funciona usando un acceso directo al ftp o bien desde fwh (que asimilo que deben estar usando ambos el mismo sistema de acceso ftp
pero distinto a filezilla)

Muchas gracias por vuestra atención
Saludos

[Baxajaun]

Hmpaquito,

por favor ejecuta

Code: Select all  Expand view

netsh advfirewall show global

Mira el comando netsh advfirewall.

Saludos

[hmpaquito]

Félix,

He hecho un netsh firewall (version win xp) y parece que todo esta bien. El puerto 21 lo da como abierto.
Por otra parte, digo que FALLA fwh y %windir%explorer.exe pero con el antivirus y el firewall DESCONECTADOS.
Asi que quiero yo entender que no sea cosa del firewall... pero quiza este equivocado.. no se...

salu2

[hmpaquito]

Además del telnet que comenté antes, he probado con el ftp.exe del SO y me abre perfectamente el ftp. Puedo hacer un dir y todo eso...
El ftp.exe ha abierto en el puerto 21.

[Baxajaun]

Hmpaquito,

como bien dices no parece ser un problema del puerto 21. Yo creo que es un problema con el programa ftp.exe. La configuración con netsh es igual en los dos equipos ?

Saludos

[hmpaquito]

Félix,

En Ftp.exe, en Telnet.exe y en filezilla las transferencias ftp funcionan muy bien.
En cambio en el programa fwh y con el %windir%explorer.exe no funciona.

Salu2

[Baxajaun]

Hmpaquito,

puedes publicar un pequeño ejemplo para poder probar ?

Muchas gracias.

Saludos

[Baxajaun]

Hmpaquito,

esto me funciona aquí

Code: Select all  Expand view

#include "FiveWin.ch"

Function Main()

ShellExecute(0,0,"%windir%/explorer.exe", "ftp://links:pass@test.exavault.com",0,1)   // No funciona o no aparece
__run("%windir%/explorer.exe ftp://links:pass@test.exavault.com")  //Si funciona
MsgInfo("Ejecutando ...")

Return NIL

Saludos

[hmpaquito]

Felix,

A mi tambien me funciona eso, pero en otros ordenadores.
Lo que hago para probar es meter ese comando en un acceso directo y probar desde ahí, y no me funciona, aunque si en otros ordenadores.

Me funciona todo lo relacionado con ftp (comandos telnet y ftp del SO y filezilla) pero no me funciona el programa fwh ni el acceso directo antes dicho.

Saludos

[Baxajaun]

Hmpaquito,

te da algún mensaje ?

He modificado el ejemplo ftpdir

Code: Select all  Expand view

// Testing the FiveWin new Internet Classes

#include "FiveWin.ch"

//----------------------------------------------------------------------------//

function Main()

   local oInternet := TInternet():New()
   local oFTP      := TFTP():New("test.exavault.com",oInternet,'links','pass')
   local aFiles

   if ! Empty( oFTP:hFTP )
      aFiles = oFTP:Directory( "*.*" )
      AEval( aFiles, { | aFile | MsgInfo( aFile[ 1 ], aFile[ 3 ] ) } )
   else
      MsgAlert( "oFTP:hFTP is null" )
   endif

   oInternet:End()

   MsgInfo( "Done!" )

return nil

//----------------------------------------------------------------------------//

Puedes probarlo ?

Muchas gracias.

Saludos

[hmpaquito]

Félix,

Finalmente he encontrado la solucion al problema.

El getlasterror() de la llamada a InternetConnect() me marcaba 12603. Con ese numero llegué a http://www.prestosoft.com/fvc_faq.asp#5 y esta buena gente ya lo explica todo: Apagar en internet explorer "trabajar fuera de línea"

Qué alegría mas grande, superada sólo un poco por el mal cuerpo del monton de horas que me ha llevado encontrar la solución.

Así pues, y resumiendo:
¿ Quien bloqueaba mi conexion a Internet cuando usaba para conectar la funcion de fwh InternetConnect() o usaba explorer.exe ? Internet Explorer por tener activado "trabajar fuera de linea"
¿ Podía conectar a ftp de otras formas ? Sí de varias: filezilla, comando ftp y comando telnet.
¿ Acaso uso yo Internet Explorer ? No señor mio, no lo uso desde hace muchos años. Sólo que la licenciadora de Windows, by the face, debe pensar que WinInet.dll es de uso exclusivo de Internet Explorer.

Así pues, es probable que tener activado "trabajar fuera de linea" afecte a todos los programas que utilicen WinInet.dll

Gracias por tu interés
Saludos

[Baxajaun]

Hmpaquito,

me alegra saber que has solucionado el problema.

Muchas gracias por compartir la solución.

Saludos