you have to write xml node here
Dim PostData As String = "Write the xml tags here"
        
        Dim Request As HttpWebRequest = DirectCast(WebRequest.Create("Write IP/URL to which push the xml here"), HttpWebRequest)
        Dim ByteArray As Byte() = Encoding.UTF8.GetBytes(PostData)
        Request.Method = "POST"
        Dim Instance As New WebException
        Dim Value As WebExceptionStatus
	 ' Set the ContentType property of the WebRequest.        
        Request.ContentType = "text"
        'Request.ContentType = "XML"
	' Set the ContentLength property of the WebRequest.        
        Request.ContentLength = ByteArray.Length
	' Get the Request stream.        
        Dim dataStream As Stream = Request.GetRequestStream()
	' Write the data to the Request stream. 
        
        dataStream.Write(ByteArray, 0, ByteArray.Length)
	' Close the Stream object. 
        
        dataStream.Close()
	' Get the response. 
        
        Value = Instance.Status
        Dim response As WebResponse = Request.GetResponse()
	' Display the status.
        
        Console.WriteLine(CType(response, HttpWebResponse).StatusDescription)
	' Get the stream containing content returned by the server.
        
        dataStream = response.GetResponseStream()
	' Open the stream using a StreamReader for easy access.
        
        Dim reader As New StreamReader(dataStream)
	' Read the content.
        
        Dim responseFromServer As String = reader.ReadToEnd()

        Lblresponse.Text += responseFromServer
        ' Clean up the streams.        
        
        reader.Close()
        dataStream.Close()
        response.Close()