Originariamente inviato da cere123
Ciao a tutti.
Ho creato una function per caricare dei file su di un server remoto (sito web) seguendo alcuni esempi.
Mi sembra corretta però ho questo errore: “Errore del server remoto: (550) File non disponibile (ad esempio file non trovato o non accessibile)..”
Con FileZilla riesco a caricare lo stesso file senza problemi.

Questa è la function:
Private Function UploadFile(ByVal Path As String, ByVal File As String) As Boolean
Dim DestFTP As String = "ftp://ftp.sitoweb.it/"; & File
Dim User As String = "USER"
Dim Pwd As String = "PASSWORD"
Dim NomeFile As String = Path & File
Try
My.Computer.Network.UploadFile(NomeFile, DestFTP, User, Pwd, True, 100000)
Return True
Catch Errore As Exception
MsgBox(Errore.Message)
Return False
End Try
End Function

Le stringhe NomeFile e DestFTP sono composte correttamente:
nomeFile = D:\prova.txt
destFtp = ftp://ftp.sitoweb.it/prova.txt

Il server è Aruba e l'indirizzo per l'FTP dovrebbe essere corretto. In FileZilla ho inserito "ftp.sitoweb.it" e funziona.

Dove sbaglio?
Ciao, se non sbaglio con aruba dovresti aggiungere anche la cartella iniziale per FTP (/sitoweb.it), ma non sono sicuro, comunque tentar non nuoce. Poi hai controllato che nel filtro (filtri temporizzati nel pannello di controllo) che usa aruba sia abilitato il tuo IP nel momento che fai la richiesta ftp?