asp.netの1ファイルでパラメータを取得して表示するファイル

asp.netにどんなPOST、GETパラメータが渡されたかを単一ファイルで確認する。

<%@ Page Language="VB" %>
<script runat="server">
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
    Dim paramsText = ""

    paramsText &= "# Form" & vbNewLine
    For Each key In Request.Form.AllKeys
        paramsText &= string.Format("[{0}] {1}" & vbNewLine, key, Request.Form(key))
    Next
    paramsText &= vbNewLine

    paramsText &= "# QueryString" & vbNewLine
    For Each key In Request.QueryString.AllKeys
        paramsText &= string.Format("[{0}] {1}" & vbNewLine, key, Request.QueryString(key))
    Next
    paramsText &= vbNewLine

    paramsText &= "---EOF---"

    lblParams.Text = paramsText.Replace(vbNewLine, "<br>")

End Sub
</script>
<html>
<body>
<form id="form1" runat="server">
<asp:Label ID="lblParams" runat="server" Text=""></asp:Label>
</form>
</body>
</html>