ASP form簡単、SESSION,ASPでフォームに記載した情報を取得する

ASP form
aspのフォームの勉強
http://www.ken3.org/asp/backno/asp041.html
を参考にしました。
ASPでフォームに記載した情報を取得する

ASPフォーム

<%@ LANGUAGE=VBSCRIPT %>
<html>
<head>
<title>ASP FORM test01</title>
</head>
<body>
aspのフォームの勉強<br>
http://www.ken3.org/asp/backno/asp041.html
を参考<br>
<%

'POST:Request.ServerVariables("REQUEST_METHOD")でPOSTかどうか
'POST:Request.Form(RF)で値が取れる
'GET:Request.QueryString(RQ)で値が取れる

    'データの表示をテーブルで行う
     If Request.ServerVariables("REQUEST_METHOD") = "POST" then 'thenを忘れやすい
        for each RF in Request.Form
            if Request.Form(RF) <> "" then
                Response.write "<table border = '1'>"
                Response.write "<TR><TD>項目名</TD><TD>値</TD></TR>"  'タイトル行
                Response.Write "<TR><TD>" & RF & "</TD>"
                Response.Write "<td>"& Request.Form(RF) & "</td></tr>"
                Response.Write "</table>"
            end if
        next
    else
    'GET
        for each RQ in Request.QueryString
            if Request.QueryString(RQ) <> "" then
                Response.write "<table border = '1'>"
                Response.write "<TR><TD>項目名</TD><TD>値</TD></TR>"  'タイトル行
                Response.Write "<TR><TD>" & RQ &  "</TD>"
                Response.Write "<td>"& Request.QueryString(RQ) & "</td></tr>"
                Response.Write "</table>"
            end if
        next

    End If

%>

    <form action="test041-1.asp" method ="post">
        name:<input type="text" name ="name"><br>
        commnet:<input type="text" name ="comment"><br>
        <input type="submit" name ="btn" value="送信">
        <input type ="reset" value ="キャンセル">
    </form>


</body>
</html>

セッション情報を取得

SESSIONの勉強、参考にしたのは

For Eachで全セッションを表示するサンプルです。

自分のFormに読み出す

SESSION

<%@ LANGUAGE=VBSCRIPT%>

<html>
<head>
<title>ASP FORM SESSIOn</title>
</head>
<body>
aspのフォームの勉強<br>
    SESSIONの勉強、参考にしたのは<br />
    
    For Eachで全セッションを表示するサンプルです。<br><br />
<%
    SESSION("name") = Request.Form("name")'post:Request.Form(), GET:Request.QueryString()
    Response.Write "session():"&(session("name"))
    Response.Write "<br>"
    Dim loopStr 'For Eachで全セッションを表示するサンプルです
    for each loopStr in session.Contents
        Response.Write(loopStr & ":" & Session.Contents(loopStr) & "<br>")
    next
%>
    <form action="session01.asp" method="post">
    name:<input type="text" name="name"><br />
        <input type="submit" name="btn" value="送信"><br />
        <input type="reset" name="cancel" value="cancel">
    </form>

</body>
</html>

こちらの記事もどうぞ