を 使った ソースコードを紹介する表示色の説明:ASP VBScriptは <% 〜 %> キーワードは です。
<%@LANGUAGE=VBScript%>
<html>
<head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis">
<title>データ受け取りのテスト</title>
</head>
<body>
<h2>データ受け取りのテスト</h2>
test027-1.asp<br>
<hr>
<% '頭で、入力パラメーターがあるかチェックする
if IsEmpty(Request.Form("TITLE")) = True Then
'そのまま下のHTMLを実行
%>
<br>
データを入力して、送信ボタンを押してください。<br>
<FORM ACTION="test027-1.asp" METHOD="POST">
タイトル:
<INPUT TYPE="text" SIZE="20" NAME="TITLE" VALUE="タイトル〜">
<br>
メモ:
<INPUT TYPE="text" SIZE="80" NAME="MEMO" VALUE="好きな文字を入れてください">
<br>
<INPUT TYPE="submit" VALUE="送 信">
<INPUT TYPE="reset" VALUE="クリア">
</FORM>
<% 'データが入力されていたら、
else
'書き込み関数を呼ぶ(外側に出したかったので)
Call TEST_WRITE(Request.Form("TITLE"), Request.Form("MEMO"))
end if 'If文もここで終わり
%>
<HR>
終了です。なんか変だけど<br>
</body>
</html>
<% 'データを受け取り、DBへ書き込むつもり
Sub TEST_WRITE(strTITLE, strMEMO)
'今は、ただデータを表示、ここに処理を書く
Response.Write "[" & strTITLE
Response.Write "]とタイトルを受け取りました<br>メモは、["
Response.Write strMEMO
Response.Write "]ですね<br>"
End Sub
%>
| 最近発売の雑誌を紹介する
プログラミングと関係あるような無いような、ビジネス・経済の雑誌を紹介します。
- PRESIDENT (プレジデント) 2008年 9/15号
- アジア経済 2008年 08月号
- 週刊 ダイヤモンド 2008年 8/30号
- 宝島 2008年 10月号
- 環境ビジネス 2008年 10月号
- 企業診断 2008年 09月号
- 財界 2008年 9/9号
- 宝石の四季 2008年 08月号
- アントレ 2008年 10月号
|