codice:
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