根据日期得到生肖的ASP函数
发布时间:2016-12-29 来源:查字典编辑
摘要:根据生日时间返回所属生肖复制代码代码如下:
根据生日时间返回所属生肖
复制代码 代码如下:
<%
FunctionZodiac(birthday)
IfIsDate(birthday)Then
birthyear=Year(birthday)
ZodiacList=Array("猴","鸡","狗","猪","鼠","牛","虎","兔","龙","蛇","马","羊")
Zodiac=ZodiacList(birthyearMod12)
EndIf
EndFunction
%>