Subir fichero por FTP con VB.NET

[moNTeZIon]

Buenos días.
Estoy obteniendo un error al tratar de subir un fichero por FTP con el código VB.NET

Código VB.NET:

Dim miUri As String = "ftp://ftp.midominio.com/carpeta/fichero.jpg"
Dim miRequest As Net.FtpWebRequest = Net.WebRequest.Create(miUri)
miRequest.Credentials = New Net.NetworkCredential("user", "pass")
miRequest.Method = Net.WebRequestMethods.Ftp.UploadFile
Try
        Dim bFile() As Byte = System.IO.File.ReadAllBytes("C:\carpeta\fichero.jpg")
        Dim miStream As System.IO.Stream = miRequest.GetRequestStream()
        miStream.Write(bFile, 0, bFile.Length)
        miStream.Close()
        miStream.Dispose()
Catch ex As Exception
        Throw New Exception(ex.Message & ". El Archivo no pudo ser enviado.")
End Try
 

ex.Message = "Error en el servidor remoto: 227 Entering Passive Mode (91,143,108,70,21,183). ."

ex.InnerException.Message = System.Net.Sockets.SocketException = {"Se ha intentado una operación de socket en una red no accesible 91.143.108.70:5557"}

La línea que provoca el error es esta:
Dim miStream As System.IO.Stream = miRequest.GetRequestStream()

¿A alguien se le ocurre qué problema puedo estar teniendo?
Muchas gracias por sus respuestas.
Saludos.