| asp根据出生时间判断生肖 |
|
| 作者：- 来源：来自互联网 时间：2008-2-16 17:35:29 『 字号：大 中 小 』
|
|
|
|
| <%
rem 从BbsXp提出来的生肖函数:
rem asp学习网 www.aspxuexi.com
Function Zodiac(birthday)
If IsDate(birthday) Then
birthyear = Year(birthday)
ZodiacList = Array("猴", "鸡", "狗", "猪", "鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊")
Zodiac = ZodiacList(birthyear Mod 12)
End If
End Function
%> |
|
上一篇文章： asp中使用随机方法的两个小函数
下一篇文章： 全面解析Server对象 |
| 【发表评论】【打印本文】【关闭窗口】 |
| |
