Return to the zodiac sign according to the birthday time
The code copy is as follows:
<%
FunctionZodiac(birthday)
IfIsDate(birthday)Then
birthyear=Year(birthday)
ZodiacList=Array("monkey","chicken","dog","pig","rabbit","huge","lag","dragon","snake","horse","sheep")
Zodiac=ZodiacList(birthyearMod12)
EndIf
EndFunction
%>