FTP o SFTP problema sintassi per script di esportazione.

Salve, ho ottenuto uno spazio ftp dal mio gestore hosting,

il protocollo è un SFTP con porta 22

Prendendo lo script per l'esportazione del file generato:

Chiedo semplicemente se deve essere modificato o non si può proprio fare.

Option Explicit

Dim Nomefile

Nomefile = ExportFilter.OutputFileName
If Rdy.FTPUpload(Nomefile,"ftp.mioserver.com", "nomeutente", "password", "/upload/nomefile.txt") Then
    Rdy.ShowMessage "Upload completato"
Else
    Rdy.ShowMessage "Errore durante upload FTP"
End If