Im beziehe mich auf dieses Thema. [VB.NET] Http Listener
Dazu mache ich einen neuen Thread, da sich das Thema um das es jetzt geht abspaltet.
Undzwar geht es darum, dass ich mit Hilfe von einem HttpListener reagieren will, und Daten per POST an ein Skript senden will.
Ohne POST klappt es prima.
Ich habe nun die ersten zwei Ergebnisse der Google-Suche durch und bin echt am verzweifeln.
Weiß jemand da etwas zu ?
Vielen Dank und ein schönes Restwochenende.
Dazu mache ich einen neuen Thread, da sich das Thema um das es jetzt geht abspaltet.
Undzwar geht es darum, dass ich mit Hilfe von einem HttpListener reagieren will, und Daten per POST an ein Skript senden will.
Ohne POST klappt es prima.
VB.NET-Quellcode
- Option Strict on
- Imports System.Net
- Module Module1
- Sub Main()
- Listen()
- End Sub
- Public Sub Listen()
- If Not HttpListener.IsSupported Then
- Console.WriteLine("Windows XP SP2 or Server 2003 is required to use the HttpListener class.")
- Return
- End If
- Using listener As New HttpListener()
- listener.Prefixes.Add("http://*:80/")
- listener.Start()
- Console.WriteLine("Listening...")
- ' Note: The GetContext method blocks while waiting for a request.
- Dim context As HttpListenerContext = listener.GetContext()
- Dim request As HttpListenerRequest = context.Request
- ' Obtain a response object.
- Dim response As HttpListenerResponse = context.Response
- ' Construct a response.
- Dim responseString As String = "x=7"
- Dim buffer As Byte() = System.Text.Encoding.UTF8.GetBytes(responseString)
- ' Get a response stream and write the response to it.
- response.ContentLength64 = buffer.Length
- Dim output As System.IO.Stream = response.OutputStream
- output.Write(buffer, 0, buffer.Length)
- ' You must close the output stream.
- output.Close()
- 'listener.[Stop]()
- End Using
- End Sub
- End Module
Ich habe nun die ersten zwei Ergebnisse der Google-Suche durch und bin echt am verzweifeln.
Weiß jemand da etwas zu ?
Vielen Dank und ein schönes Restwochenende.