[VB.NET] Effettuare un post HTTP

[ans]

Dim objReq As Net.HttpWebRequest = _
            CType(Net.WebRequest.Create(url), Net.HttpWebRequest)

Dim arrParam() As Byte = Text.Encoding.ASCII.GetBytes(parametri)
'parametri = la stringa contenente i dati da inoltrare

objReq.Method = "POST"
objReq.ContentType = "multipart/form-data"
objReq.ContentLength = arrParam.Length

Dim objPostWriter As IO.Stream = objReq.GetRequestStream()

Try
   objPostWriter.Write(arrParam, 0, arrParam.Length)
Catch ex As Exception
   ' catch eventuale errore
Finally
   objPostWriter.Close()
End Try

Dim objRes As Net.HttpWebResponse

Try
   objRes = CType(objReq.GetResponse(), Net.HttpWebResponse)
Catch ex As Exception
   ' catch eventuale errore
End Try

Dim readStream As IO.StreamReader
Dim risposta As String ' risposta x la richiesta HTTP

Try
   readStream = New IO.StreamReader(objRes.GetResponseStream())
   risposta = readStream.ReadToEnd()
Catch ex As Exception
   ' catch eventuale errore
Finally
   readStream.Close()
   objRes.Close()
End Try