16.リンクにふれると同時にフォームにメッセージを表示させる
リンクにふれると同時にフォームにメッセージを表示させるスクリプトです。みなさんはステータスバーにアドレス(http://…ではじまるやつ)でなく日本語でメッセージが表示されるのを見たことがあると思いますが、これはそれをフォームに置き換えています。
<SCRIPT language="JavaScript">
<!--
function introduce(i){var msg;
switch( i ){case 0:msg="あゆのプロフィールです。";break;
case 1:msg="あゆのスケジュールです。";break;
case 2:msg="あゆの過去の作品です。";break;
case 3:msg="和歌子のプロフィールです。";break;
case 4:msg="和歌子のスケジュールです。";break;
case 5:msg="和歌子の過去の作品です。";break;
default:msg = "";break; //(1)
}
document.TextMSG.val.value = msg;
}
//-->
</SCRIPT>
<FONT FACE="MS Pゴシック" STYLE="font-size:3.70mm"><a href="http://www18.freeweb.ne.jp/art/hasky/ayu/profile.html" onmouseover="introduce(0)" onmouseout="introduce(-1)">あゆプロフィール</a></FONT><BR>
<FONT FACE="MS Pゴシック" STYLE="font-size:3.70mm"><a href="http://www18.freeweb.ne.jp/art/hasky/ayu/schejule.html" onmouseover="introduce(1)" onmouseout="introduce(-1)">あゆスケジュール</a></FONT><BR>
<FONT FACE="MS Pゴシック" STYLE="font-size:3.70mm"><a href="http://www18.freeweb.ne.jp/art/hasky/ayu/disco.html" onmouseover="introduce(2)" onmouseout="introduce(-1)">あゆディスコグラフィー</a></FONT><BR>
<FONT FACE="MS Pゴシック" STYLE="font-size:3.70mm"><a href="http://www18.freeweb.ne.jp/art/hasky/risky/profile.html" onmouseover="introduce(3)" onmouseout="introduce(-1)">和歌子プロフィール</a></FONT><BR>
<FONT FACE="MS Pゴシック" STYLE="font-size:3.70mm"><a href="http://www18.freeweb.ne.jp/art/hasky/risky/schejule.html" onmouseover="introduce(4)" onmouseout="introduce(-1)">和歌子スケジュール</a></FONT><BR>
<FONT FACE="MS Pゴシック" STYLE="font-size:3.70mm"><a href="http://www18.freeweb.ne.jp/art/hasky/risky/disco.html" onmouseover="introduce(5)" onmouseout="introduce(-1)">和歌子ディスコグラフィー</a></FONT>
<form name="TextMSG">
<input name="val" size=75 maxlength=50>
</form>
(説明)
このスクリプトはリンクにふれることによってonmouseover属性でintroduce()関数を呼び出してintroduce()のかっこ内の数字にあたるcaseメソッドを呼び出すことによってフォームにメッセージを表示します。リンクから外れたときはonmouseout属性でintroduce(-1)を呼び出し、フォームにあったメッセージを消去します。(赤字の部分)
実行結果
あゆプロフィール
あゆスケジュール
あゆディスコグラフィー
和歌子プロフィール
和歌子スケジュール
和歌子ディスコグラフィー