Dim byteArray As Byte() = Encoding.UTF8.GetBytes(strRequestFile.ToString)
                    Dim request As WebRequest = WebRequest.Create( _
                      txtASPServer.Text)
                    With request
                        .Timeout = Val(strTimeout)
                        .Method = "POST"
                        .ContentType = "multipart/related;boundary=" & _
                          strBoundary & _
                          ";type=""text/xml;charset=UTF-8"";start=""<part1." & _
                          "C@ganter-interior.com"""
                        .Credentials = CredentialCache.DefaultCredentials
                        .ContentLength = byteArray.Length
                    End With
 
                    ' Create Stream with data
 
                    ' Alternative geht auch nicht
                    'Dim myWriter = New StreamWriter(request.GetRequestStream())
                    'myWriter.Write(strRequestFile)
                    'myWriter.Close()
 
                    Dim dataStream As System.IO.Stream
                    dataStream = request.GetRequestStream()
                    dataStream.Write(byteArray, 0, byteArray.Length)
                    dataStream.Close()
 
                    Dim response As WebResponse = request.GetResponse