出来るのだＡＳＰＱ＆Ａ掲示板（過去ＬＯＧ）

出来るのだＡＳＰＱ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
【PR】パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。

Topに戻る

掲示板に戻る

検索

削除

管理者

[1098] Re:【解答例】ラジオボタンとsubmitボタン（改良２案）

コメントする

投稿者：北岳さん 2001/11/27 14:49:04

> よろしければ、またお返事ください。お願いします。

「はい。」
いや、そんな短い返事でなくて、もっと長い返事をします。
実は、さっきの解答例を読み返して、これではまずいと思い、書き直していました。

　----------------------------------------------------
一旦test.aspで全部受け取ってから、条件を判断して行き先を分け、
　登録：torok.asp
　検索：kensak.asp
　削除：sakujo.asp
に直接飛ばすには、response.redirectを使いますが、その場合、test.asp に<html>など書くと、
「既にヘッダが書き込まれている」とかいうエラーになります。
　
また、Request.Formの値は、
・Session変数に置き換えるか、
・QueryStringに置き換えないと、
次のtorok.aspなどには引き継げません。
　
　----------------------------------------------------------
【改良案1.Session変数使用】
****** test.asp *******
<%
Session.TimeOut=20 '分
Session.Contents("name")=Request.Form("name")
if Request.Form("sex")="male" then Session.Contents("sei")="男"
if Request.Form("sex")="female" then Session.Contents("sei")="女"
if Request.Form("sex")="human" then Session.Contents("sei")="無指定"
if Request.Form("sub1")="登録" then response.redirect "/(aspフォルダ)/torok.asp"
if Request.Form("sub2")="検索" then response.redirect "/(aspフォルダ)/kensak.asp"
if Request.Form("sub3")="削除" then response.redirect "/(aspフォルダ)/sakujo.asp"
%>

****** torok.asp *******
<html><body bgcolor="#ffeeff">
<p><%= Session.Contents("name") %> さん（<%= Session.Contents("sei") %>）を登録します。
</body></html>
　
　----------------------------------------------------------
【改良案2.Querystring使用】
****** test.asp *******
<%
nam=Request.Form("name")
if Request.Form("sex")="male" then sei="男"
if Request.Form("sex")="female" then sei="女"
if Request.Form("sex")="human" then sei="無指定"
if Request.Form("sub1")="登録" then response.redirect "/(aspフォルダ)/torok.asp?n=" & nam & "&s=" & sei
if Request.Form("sub2")="検索" then response.redirect "/(aspフォルダ)/kensak.asp?n=" & nam & "&s=" & sei
if Request.Form("sub3")="削除" then response.redirect "/(aspフォルダ)/sakujo.asp?n=" & nam & "&s=" & sei
%>

****** kensak.asp *******
<html><body bgcolor="#ffffee">
<p><%= Request.QueryString("n") %> さん（<%= Request.QueryString("s") %>）を検索します。
</body></html>
　
ちなみにtextの中身でも何でも、Session変数になら1GBくらいは楽に収まりました。（上限はマシン容量で決まるはずで、事実上、ありません。）
QueryStringには上限があったと思いますが、相当入ります。（前回調査から1月以上経過しましたので、忘却。）

削除する