HTMer

研究互联网络和电脑应用技术的IT技术网。 (勤奋+智慧→理想)

« 禁止Flash Player自动更新的方法解决瑞星防火墙2009和城市热点Dr.com客户端冲突的方法 »

ASP根据出生日期判断生肖的函数

    今天在网上看到一个利用出生日期来判断生肖的ASP函数,觉得不错,拿来做个备忘。

    程序比较简单,首先把十二生肖设定在一个排序数组中,然后将有效的出生年份除以12取余,最后在生肖数组中找到余数对应的生肖即可,相关代码如下所示:

 
<%
Function Zodiac(birthday)
If IsDate(birthday) Then '判断出生日期是否是有效的日期格式
birthyear = Year(birthday) '取得出生日期中的年份
ZodiacList = Array("猴", "鸡", "狗", "猪", "鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊") '创建生肖数组
Zodiac = ZodiacList(birthyear Mod 12) '出生年份除以12取余,并在生肖数组中找到对应的值
End If
End Function

response.write Zodiac("2009-04-08") '输出2009-04-08出生人的生肖
%>


欢迎转载,转载请注明:转载自HTMer [ http://www.htmer.com/ ]

本文链接地址:http://www.htmer.com/article/614.htm

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

HTMer , Powered By Z-Blog, 苏ICP备08003082号

本站采用创作共用版权协议, 要求署名、非商业用途和保持一致. 转载本站内容必须也遵循“署名-非商业用途-保持一致”的创作共用协议.
HTM|HTML|ASP|PHP|JSP|Mysql|SQL|Dreamweaver|Flash|Fireworks|Photoshop|SEO Copyright www.HTMer.com. Some Rights Reserved. English Version