IsEmpty を 使った ソースコードを紹介する表示色の説明:ASP VBScriptは <% 〜 %> キーワードはIsEmpty です。
<%@LANGUAGE=VBScript%>
<html>
<head>
<title>test IsEmptyでデータチェック</title>
</head>
<body>
<h2>IsEmptyでデータチェック 入力と処理を1つのASPで行う</h2>
test005-1.asp<br>
<% '*1 頭で、入力パラメーターがあるかチェックする
if IsEmpty(Request.Form("USER-NAME")) = True Then
'そのまま下のHTMLを実行
%>
<br>
好きに入力して、送信ボタンを押してください。<br>
<FORM ACTION="test005-1.asp" METHOD="POST">
お名前:
<INPUT TYPE="text" SIZE="20" NAME="USER-NAME" VALUE="匿名希望">
<br>
<br>
このメルマガでやってほしいことにチェックを入れてください<br>
<INPUT TYPE="CHECKBOX" NAME="c_1" VALUE="on">HTMLから詳しく丁寧に<BR>
<INPUT TYPE="CHECKBOX" NAME="c_2" VALUE="on">VBScriptをもっと詳しく<BR>
<INPUT TYPE="CHECKBOX" NAME="c_3" VALUE="on">ゲーム作ろうよ<BR>
<br>
このメルマガの満足度を5段階で<br>
不満 ------ 満足<br>
1<INPUT TYPE="RADIO" NAME="q_5" VALUE="1">
2<INPUT TYPE="RADIO" NAME="q_5" VALUE="2">
3<INPUT TYPE="RADIO" NAME="q_5" VALUE="3">
4<INPUT TYPE="RADIO" NAME="q_5" VALUE="4">
5<INPUT TYPE="RADIO" NAME="q_5" VALUE="5">
<br>
<br>
<br>
<INPUT TYPE="submit" VALUE="送 信">
<INPUT TYPE="reset" VALUE="入力し直す">
</FORM>
<% 'データが入力されていたら、
else
'そのまま、テキストを表示する
Response.Write Request.Form("USER-NAME")
Response.Write "さん、入力どうもです。<br>"
'チェックボックスonの時メッセージを表示する
if Request.Form("c_1") = "on" then
Response.Write "HTMLかぁ、ニガテなんだよね<br>"
end if
if Request.Form("c_2") = "on" then
Response.Write "VBScript、まぁ一歩一歩やりましょうよ<br>"
end if
if Request.Form("c_3") = "on" then
Response.Write "えっ、ゲーム作成?ムリムリ<br>"
end if
'RADIOボタン、中身表示と値を判断してメッセージ表示
Response.Write "満足度は"
Response.Write Request.Form("q_5")
Response.Write "かぁ、、、"
if Request.Form("q_5") <= 2 then '2以下は不満にする
Response.Write "不満かぁ、がんばらないと"
end if
if Request.Form("q_5") >= 4 then '4以上満足なら
Response.Write "よかったぁ〜一安心"
end if
Response.Write "<br>"
end if '長いIf文もここで終わり
%>
<HR>
終了です。なんか変だけど<br>
<br>
<HR>
解説ページ→
<A HREF="http://www.ken3.org/backno/backno_asp02.html#5">
<b>[No.5 IsEmptyでデータチェック]</b></A><br>
<Font Size=-1>
<br>
<a Href="http://www.ken3.org/asp/" TARGET="_top">[ASP系メニューへ]</a>
<a href="http://www.ken3.org/cgi-bin/bbs/asp/wforum.cgi" target="F_RIGHT">[質問・感想掲示板]</A>
<a href="http://www.ken3.org/backno/backno_asp_mokuji.html" target="F_RIGHT">[バックナンバー目次]</a><br>
<br>
</Font>
<hr>
</body>
</html>
| 最近発売の雑誌を紹介する
今週発売の男性誌です。プログラミング以外にも興味を持って???
- カジカジ 2008年 06月号
- BEST CLUB (ベストクラブ) 2008年 06月号
- SpyMaster (スパイマスター) 東海版 2008年 06月号
- KING (キング) 2008年 06月号
- men's egg (メンズエッグ) 2008年 06月号
- Ollie (オーリー) 2008年 06月号
- BRUTUS (ブルータス) 2008年 6/1号
- Pen (ペン) 2008年 6/1号
- おとなの週末 2008年 06月号
|