Error uploading e file with FtpWebRequest

[Alexis]

Hello,

I am trying to upload a file to an ftp server using the FtpWebRequest class,
but I get the following error.
The requested URI is invalid for this FTP command.

I do can upload the file from the Internet Explorer so I have rights to do
it. Why is the 2.0 FtpWebRequest class failing? What I am doing wrong?

My Code:
Dim ftpUri As Uri
Dim s As String

Dim oStream As New StreamReader(ms trFileName)
Dim arBytes() As Byte = Encoding.UTF8.G etBytes(oStream .ReadToEnd())
oStream.Close()

ftpUri = New Uri(mstrRemoteH ost)

If Not (ftpUri.Scheme = Uri.UriSchemeFt p) Then
Throw New ArgumentExcepti on("URI is not an FTp site")
End If

Dim ftpRequest As FtpWebRequest = CType(WebReques t.Create(ftpUri ),
FtpWebRequest)

ftpRequest.Meth od = WebRequestMetho ds.Ftp.UploadFi le

ftpRequest.Cont entLength = arBytes.Length

ftpRequest.Cred entials = New NetworkCredenti al(mstrRemoteUs er,
mstrRemotePassw ord)

Dim oftpStream As Stream

Try
oftpStream = ftpRequest.GetR equestStream()
Catch ex As Exception
Return ex.Message
End Try

oftpStream.Writ e(arBytes, 0, arBytes.Length)
oftpStream.Clos e()

Dim ftpResponse As FtpWebResponse
ftpResponse = ftpRequest.GetR esponse

s = ftpResponse.Sta tusDescription

Return s