Gambas Ftpclient, upload e download di file

Inviare file con Ftp può risultare molto utile, soprattutto se vogliamo condividere i nostri dati. Vediamo come inviare via ftp i file in Gambas.

Ora vediamo come fare l’upload, cioè inviarli:

PUBLIC SUB Button1_Click()
DIM nome AS String
nome = User.home & “/testo.txt”
con.URL = “http://indirizzoweb.estensione/percorso/nome.estensione”
con.Password = “xxxx”
con.User = “nomeutente”
con.Timeout = 120
con.Put(nome)
END

In nome mettiamo il percorso in locale del nostro file, in :url, invece, va messo l’indirizzo web completo, di percorso e del nome che deve prendere il nostro file una volta trasferito, in password la nostra password ed infine in .user il nostro nome utente.

Per scaricarli basterà fare:

PUBLIC SUB Button2_Click()
DIM nome AS String
nome = User.home & “/file.estensione”
con.URL = “http://indirizzoweb.estensione/percorso/nome.estensione”
con.Password = “xxxxxx”
con.User = “nomeutente”
con.Timeout = 120
con.get(nome)
END

Dove in nome metteremo il nome che deve prendere in locale il nostro file da scaricare e il percorso, e in .url metteremo il file da scaricare con il sito e il percorso. Per il resto è uguale al precedente.

Ovviamente dobbiamo attivare da Progetto–>proprietà–>componenti–> gb.net.curl e gb.net.

Nel nostro form dovremmo mettere da network il componente ftpclient e dichiararlo all’inizio così:

PUBLIC con AS NEW FtpClient

E buono scambio.

Lascia un commento

Il tuo indirizzo email non sarà pubblicato. I campi obbligatori sono contrassegnati *