Web Development

Dim oRequest As HttpWebRequest = WebRequest.Create("https://www.server.com/WebService")
Dim oStream As Stream = oRequest.GetRequestStream
Dim oXML As Xml.XmlTextWriter = New Xml.XmlTextWriter(oStream, Encoding.GetEncoding("UTF-8"))

address = New Uri("https://www.server.com/WebService")
request = DirectCast(WebRequest.Create(address), HttpWebRequest)
request.Method = "POST"
request.ContentType = "application/x-www-form-urlencoded"

<WebServiceBinding("SomeBindingName", "SomeBindingNS")> _
Public Class CustomProxy
    Inherits SoapHttpClientProtocol

    <SoapRpcMethod(Action:="urn:AstroIntf-IAstro#GetSunriseInfo", RequestNamespace:="run:AstroIntf-IAstro")> _
        Public Function GetSunriseInfo(ByVal Latitude As Double, ByVal Longitude As Double, _
                                       ByVal Year As Integer, ByVal Month As Integer, ByVal Day As Integer, _
                                       ByVal TimeBiasMinutes As Integer) As String
        Me.Url = "https://www.server.com/WebService"
        Dim ret() As Object
        ret = Me.Invoke("GetSunriseInfo", _
                      New Object() _
                      {Latitude, Longitude, Year, Month, Day, TimeBiasMinutes})
        Return CType(ret(0), String)
    End Function
End Class

Dim oClient As New WebClient
Dim oStream As Stream = oClient.OpenWrite("https://www.server.com/WebService", "POST")
Dim oWriter As StreamWriter = New StreamWriter(oStream)
oWriter.WriteLine("Hello world")
oWriter.Close()

<form target="_blank" action='http://www.server.com/WebService' method="POST"> 
<table>
  <tr>
    <td>Enter something:</td>
    <td><input type="text" size="30" name="test1" /></td>
  </tr>
  <tr>
    <td></td>
    <td align="right"> <input type="submit" value="Submit" /></td>
  </tr>
</table>
</form>