Using HttpWebRequest to Post a byte array

[Fred Herring]

I currently use httpwebrequest to download large byte array files from my
server. I am curious about how to change my httpwebrequest code to allow
posing a large byte array to a virtual foldeer. This is my download code
which work well in
returning a large byte array from the server:

Function GetImageFromURL(ByVal url As String) As Byte()
allDone.Reset()
Try
Dim wr As HttpWebRequest = DirectCast(WebRequest.Create(url), HttpWebRequest)
If Not ProxyObject Is Nothing Then wr.Proxy = ProxyObject
Dim MRS As New RequestState
MRS.request = wr
Dim result As IAsyncResult = CType(wr.BeginGetResponse(AddressOf
RespCallBack, MRS), IAsyncResult)
allDone.WaitOne()
MRS.response.Close()
Return MRS.ReturnBLOB
Catch MyException As Exception
End Try
End Function

Private Sub RespCallBack(ByVal asyncResult As IAsyncResult)
Dim MRS As RequestState = CType(asyncResult.AsyncState, RequestState)
Dim wr2 As HttpWebRequest = CType(MRS.request, HttpWebRequest)
MRS.response = CType(wr2.EndGetResponse(asyncResult), HttpWebResponse)
Dim RS As Stream = MRS.response.GetResponseStream()
MRS.responseStream = RS
Dim br As BinaryReader = New BinaryReader(MRS.responseStream)
Dim bytesize As Long = MRS.response.ContentLength
MRS.ReturnBLOB = br.ReadBytes(CInt(bytesize))
allDone.Set()
End