Servidor de FTP gratuito

[JoséQuintas]

Não entendi qual a finalidade, ou não está relacionado ao primeiro assunto.

[asimoes]

Toledo,

Essas dicas poderiam ser movidas para dicas e contribuições por gentileza.

[Toledo]

As mensagens foram movidas para a seção Contribuições, Dicas e Tutoriais:

https://pctoledo.org/forum/viewto ... 43&t=17267

Abraços,

[JoséQuintas]

Não entendi se o filezilla é pra montar o servidor FTP, ou se ele vai servir de ponte para o mundo externo.
Porque se for só servidor ftp...

[fladimir]

Pode ser tb Quintas da forma q vc mencionou, o Filezilla Server é outra opção q tb tem vários recursos e facilidade de configurar.

O ASimoes fez um tutorial pra quem quiser fazer com o FileZilla Server FTP no link q o Toledo mencionou.

[]´s

[JoséQuintas]

Tudo depende da finalidade.
Meu servidor é só pra download, então eu uso o COPY pra upload.
E download é via http mesmo.
Já pra outras coisas, uso o da internet.
Já teve caso em cliente de bloquear o da internet e o outro não, e vice-versa.
São os mistérios do progresso...

[fladimir]

E download é via http mesmo.

poderia passar o link de como fazer isto?

[JoséQuintas]

Não entendi.

[asimoes]

Quintas,

Eu também gostaria da informação de como você faz o download via http

[JoséQuintas]

Continuo não entendendo, isso sempre existiu.
O download por ftp que seria a novidade.
A hbtip é pra todo tipo de comunicação com a web.
Mesmo assim, eu uso o msxml2.

Teve uma época que o Harbour retornava um array de Ascii ao invés de uma string, ou talvez o Harbour 3.2 ainda faça isso.
Deixei no fonte até hoje.

Código: Selecionar todos

FUNCTION DownloadFile( cUrl, cFile )

   LOCAL oSoap, aRetorno, nHandle, nAscii, lOk

   lOk := .F.
   BEGIN SEQUENCE WITH __BreakBlock()
      oSoap := Win_OleCreateObject( "MSXML2.ServerXMLHTTP" )
      oSoap:Open( "GET", cUrl, .F. )
      oSoap:Send()
      aRetorno := oSoap:ResponseBody()
      nHandle := fCreate( cFile )
      IF ValType( aRetorno ) == "C"
         fWrite( nHandle, aRetorno )
      ELSE
         FOR EACH nAscii IN aRetorno
            fWrite( nHandle, Chr( nAscii ) )
         NEXT
      ENDIF
      fClose( nHandle )
      lOk := .T.
   END SEQUENCE
   RETURN lOk

[asimoes]

Quintas,

Você usa http para fazer download, você tem o arquivo em algum lugar na internet, provedor etc. e isso que eu queria saber.

Com o servidor de ftp caseiro (filezilla server), você faz as duas coisas download/upload, ou usa um kinghost da vida, eu fiz a assinatura do kinghost, mas se o meu ftp caseiro funcionar 100% só vou assinar o kinghost só por um ano.

eu tenho outras opções também, googledrive, dropbox é sempre bom diversificar

[JoséQuintas]

Meu servidor atua como um site na internet.
Faço um COPY da minha máquina, e o cliente até poderia baixar diretamente dele.

Aliás... poderia não. O aplicativo, quando o cliente clica em mostrar PDF, já faz download do meu servidor, como um site.

Na mesma imagem que mostrei sobre o FTP Windows, tem sobre o servidor HTTP Windows, e ASP, e etc.

[JoséQuintas]

Só adicional:

Quando saiu o Windows 10 Enterprise, foi um dos testes que fiz.
Não sei nas outras versões, mas nessa tudo isso continua existindo.

Acho que o Windows 10 profissional ainda vale, só não vai ter aplicativo remoto.

E lembrando que pode ser usada máquina virtual, pra teste ou pra uso definitivo.
Pode ter vários servidores virtuais, e uma única máquina real.

[asimoes]

Quintas,

Teria como você explicar como montou este recurso na sua máquina?

Achei interessante.

[JoséQuintas]

Naquele mesmo lugar, é adicionar IIS e serviço da world wide web.
Ao fazer isso, por default a pasta c:\inetpub\wwwroot é seu site.
Tudo que colocar dentro, ou abaixo dela, fica disponível pra download.

http://www.jpatecnologia.com.br

tem bastante coisa lá não visível.
Só pesquisar "servidor".
Lá fica de forma resumida, pra eu lembrar quando precisar.... rs

Mas no geral é só acrescentar o recurso do Windows, e entra tudo default.

Testem aí:
http://serverjpa.no-ip.org:3380/

No momento é uma máquina com um único SSD de 120GB.