Imports System.Net
Imports System.IO
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Dim strXml As String
        strXml = "XML= Sende deine XML"
        Dim sURL As String = _
          "http://api.immobilienscout24.de/api/xmlhttp/SessionService"
        Dim req As HttpWebRequest = HttpWebRequest.Create(sURL)
        req.ContentType = "application/x-www-form-urlencoded"
        req.ContentLength = CLng(strXml.Length)
        req.Method = "POST"
        Dim s As Stream
        s = req.GetRequestStream
        Dim sw As StreamWriter = New StreamWriter(s)
        sw.Write(strXml)
        sw.Close()
        s.Close()
        Dim resp As WebResponse = req.GetResponse()
        Dim sResp As StreamReader = New StreamReader(resp.GetResponseStream)
        sResp.Close()
        resp.Close()
        req = Nothing
    End Sub
End Class