IsEmptyでデータチェック 入力と処理を１つのＡＳＰで行う

三流君(TOP) /ASPで遊ぶ /ASP記事一覧を見る
分類: [Form関係] /DB系ADOを使い( [Mdb接続] [CSV接続] [Excel接続]) /[ASPでTextFileを操作] /[VBScript関数ほか]

IsEmptyでデータチェック 入力と処理を１つのＡＳＰで行う

test005-1.asp

好きに入力して、送信ボタンを押してください。
お名前：

このメルマガでやってほしいことにチェックを入れてください
HTMLから詳しく丁寧に
VBScriptをもっと詳しく
ゲーム作ろうよ

このメルマガの満足度を５段階で
不満 ------　満足
1 2 3 4 5


終了です。なんか変だけど

解説ページ→ [No.5 IsEmptyでデータチェック]

[ＡＳＰ系メニューへ] [質問・感想掲示板] [バックナンバー目次]


IsEmptyを使用したサンプル(ソースの紹介)

詳細解説は[http:/asp/backno/asp005.html]を見てください
下記、/cgi-bin/test/test005-1.aspのソース（中身）です

IsEmpty を 使った ソースコードを紹介する

表示色の説明：ASP VBScriptは <% 〜 %>
キーワードはIsEmpty です。
<%@LANGUAGE=VBScript%>
<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis">
<title>test IsEmptyでデータチェック</title>
</head>
<h3 style="color:black;background-color:#e0ffe0">
IsEmptyでデータチェック  入力と処理を１つのＡＳＰで行う</h3>
<h2>IsEmptyでデータチェック  入力と処理を１つのＡＳＰで行う</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>
このメルマガの満足度を５段階で<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  '２以下は不満にする
			Response.Write "不満かぁ、がんばらないと"
		end if
		if Request.Form("q_5") >= 4 then  '４以上満足なら
			Response.Write "よかったぁ〜一安心"
		end if
		Response.Write "<br>"
    end 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">[ＡＳＰ系メニューへ]</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>

最近発売の雑誌を紹介する

女性誌を紹介します。数少ない 女性読者 向けの紹介でした(笑) ※重たい雑誌は通販や近くのコンビニで？

Googleで関連項目を検索する

[キーワード:IsEmpty] と サンプル|解説|Dim|Set で検索
↓で検索して他のページも確認してみてください。
Google

あれ？私のページが検索に載ってない（笑）一度お試しを（私のページに、また戻ってきてね（爆））

リンク 三流君 ＡＳＰ系 の 解説を項目ごとにまとめてみました

まぁ、基本はデータの受け取りかなぁ。
・[Form等を使用したデータのやり取り]・・・ASPと言っても、HTMLの入力フォームからデータを受け取ります。POSTやGETでやりとりを押さえますか。

次は、データの入出力 で ADOを使った(ADOで接続) と SQLの解説を少々
・[ADOでMdbファイルを使う]・・・MDBと接続して、簡単な追加・更新・削除を行った。
・[ADOでExcelと接続してみた]・・・.xlsと接続してSQLを使ってみた。
・[ADOでCSVと接続してみた]・・・.CSV テキストを読み出した。※更新・削除はできません

DBが使えるので、あまり使用しないけど、普通のテキストファイル処理
・[テキストファイル処理]・・・ファイルを開いて、書き込む。１行読み込みなどを軽く

VBScriptでFormat関数が無いなど、微妙にVBAと違うけど
[VBScript関数関係の説明]・・・少し、処理を書いてみた。
[その他処理サンプル]・・・あまり良いサンプル作れなかったけど。。。
何かの参考となれば幸いです。

その他：blogや広告↓
[日記的なblog]← あまり更新してないけど・・・
[三流なプログラムコード]← 恥ずかしいのであまり載せてないけど・・・
[通販商品の足跡を紹介] ←通販商品などを紹介してます

[Topへ戻る] −−＞[ASP系のTOPへ戻る] −−＞[記事一覧を見る]

現在時刻は、2010/03/18 23:28:05です。