Ho trovato una procedura che esegue il DOWNLOAD tramite FTP, vorrei capire come effettuare l'UPLOAD
...
If UseResume AndAlso ResumeFrom > 0 Then
SendCommand("REST " + ResumeFrom.ToString)
If LastResponseType = 4 OrElse LastResponseType = 5 Then
Disconnect()
DataSocket.Close()
Throw New DownloadException("Server doesn't support
resume.")
End If
End If
'Ask the server to send us the file
SendCommand("RETR " + RequestedFile)
'DEVO CAMBIARE IL COMANDO RETR???????????
If LastResponseType = 4 OrElse LastResponseType = 5 Then
Disconnect()
DataSocket.Close()
Throw New DownloadException("Download request failed.")
End If
'Download all the bytes
DownloadData()
....
dove SendCommand è:
...
Private Sub SendCommand(ByVal Command As String)
Try
DownloadSocket.Send(Encoding.ASCII.GetBytes(Comman d &
ControlChars.CrLf))
WaitForResponse()
Catch
If IsConnected Then Throw New DownloadException("Error while
writing to command stream.")
End Try
End Sub
...
Rispondi quotando
