閏年判別
<body bgcolor="#FFFFFF">
<div align="center"><font color="#FF0000"><b>閏年判別 </b></font><b></b> </div>
<%
if Request.Form("cal")="y" then
n=Cint(Request.form("me"))
if ((n mod 4=0) and (n mod 100<>0)) or (n mod 400=0) then
Response.Write n & "是閏年！<br>"
else
Response.Write n&"不是閏年。<br>"
end if
end if
%>
<div align="center"><font color="#FF0000"><b>閏年判別 </b></font><b></b> </div>
<%
if Request.Form("cal")="y" then
n=Cint(Request.form("me"))
if ((n mod 4=0) and (n mod 100<>0)) or (n mod 400=0) then
Response.Write n & "是閏年！<br>"
else
Response.Write n&"不是閏年。<br>"
end if
end if
%>
<form method="post" action="try2.asp">
輸入年份：
<input type="text" name="me" size="5">
<input type=hidden name=cal value=y>
<input type="submit" name="Submit" value="提交">
</form>