ASP.NET(vb) ถามเรื่องการ Request ค่า Parametor จาก httpPost

Page.Response.ContentType = "text/html"

Dim reader As New StreamReader(Page.Request.InputStream)
Dim xmlData As String = reader.ReadToEnd()

Response.Write(xmlData)

Dim allKeys As String() = Request.Params.AllKeys

For Each keyName As String In allKeys
	Response.Write(String.Format("{0}<br />"), keyName)
Next

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="addcode.aspx.vb"
Inherits="codelib.addcode" validateRequest="false"%>

Public Function XmlToDataTable(xmlData As String) As DataTable
	Dim Dt As New DataTable()

	Dim xmlDoc As New XmlDocument()
	xmlDoc.LoadXml(xmlData)

	Dim root As XmlNode = xmlDoc.FirstChild.ChildNodes(0)

	For i As Integer = 0 To root.ChildNodes.Count - 1
		Dt.Columns.Add(New DataColumn(root.ChildNodes(i).Attributes(0).InnerXml, GetType(String)))
	Next

	For Each xmlNode As XmlNode In xmlDoc.GetElementsByTagName("ROW")
		Dim Dr As DataRow = Dt.NewRow()

		For i As Integer = 0 To xmlNode.ChildNodes.Count - 1
			Dr(i) = xmlNode.ChildNodes(i).InnerText
		Next

		Dt.Rows.Add(Dr)
	Next

	Return Dt
End Function