乱数 を 使った ソースコードを紹介する表示色の説明：ASP VBScriptは <% 〜 %>
キーワードは乱数 です。
<%@LANGUAGE=VBScript%>
<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis">
<title>乱数を発生させる 三流君 ＡＳＰで遊ぶ、失敗する No.003</title></head>
<body bgcolor="#ffffff">
<h2>test003-2.asp 乱数を発生させる</h2>
<%
Dim n '(*1)乱数受け取り用、変数の型は指定できないみたい
Randomize '*2 これでで乱数系を初期化
n = Int(Rnd * 100) + 1 '*3 乱数を発生と代入
Response.Write "今日の幸運度は<br>" '固定の文字
Response.Write n '変数の中身を表示
Response.Write "%です<br>" '固定の文字
%>
<br>
<HR>
解説ページ
<A HREF="http://www.ken3.org/backno/backno_asp01.html#3">
<b>[No.3 乱数を使用して今日の運を表示]</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>
|