闰年判别
<%
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 & "是闰年!
"
else
Response.Write n&"不是闰年。
"
end if
end if
%>
|
![]() |
|
| ASP技术首页 | ASP基础 | ASP应用 | ASP技巧 | 性能优化 | 安全加密 | XML相关 | 全文检索 | 客户端相关 | 打印相关 | 数据库相关 | 正则表达式 | 系统相关 | 组件开发 | 脚本编码 | 远程脚本 | 邮件相关 | FSO专题 | 分类 | 专题 | 留言本 | 投稿 | 搜索 |
<%
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 & "是闰年!
"
else
Response.Write n&"不是闰年。
"
end if
end if
%>