Problem mit Webrequest

kerstel

Erfahrenes Mitglied
Hallo,
ich habe folgenden Code:
Code:
    Private Function Request2HP() As Boolean
        Try
            Dim request As WebRequest = WebRequest.Create(hpServer)
            request.Method = "POST"
            Dim byteArray As Byte() = GetBytesFromFile(XMLFile2HP)
            request.ContentType = "application/x-www-form-urlencoded;charset=UTF-8"
            request.ContentLength = byteArray.Length
            Dim dataStream As Stream = request.GetRequestStream()
            dataStream.Write(byteArray, 0, byteArray.Length)
            dataStream.Close()
            Dim response As WebResponse = request.GetResponse()
            Console.WriteLine(CType(response, HttpWebResponse).StatusDescription)
            dataStream = response.GetResponseStream()
            Dim reader As New StreamReader(dataStream)
            ResponseData = reader.ReadToEnd()
            reader.Close()
            dataStream.Close()
            response.Close()
            Return True
        Catch e As Exception
            Console.WriteLine(e.Message)
            Return False
        End Try
    End Function

Die Funktion soll an einen Server (hpServer) eine XML Datei (XMLFile2HP) senden, vom Server sollte dann ein Response kommen, allerdings wird mir bei der Zeile "Dim response As WebResponse = request.GetResponse()" der Fehler "412 Precondition failed" ausgegeben. Weiß jemand woran das liegt?
Danke für die Hilfe.
Gruß
Ralf
 
Zurück