根據(jù)日期得到生肖的ASP函數(shù)
更新時間:2008年01月18日 14:37:46 作者:
最近公司開放網(wǎng)站需要用到根據(jù)用戶添加的出生日期得到生肖發(fā)現(xiàn)了這個函數(shù)。使用起來不錯
根據(jù)生日時間返回所屬生肖
<%
Function Zodiac(birthday)
If IsDate(birthday) Then
birthyear = Year(birthday)
ZodiacList = Array("猴", "雞", "狗", "豬", "鼠", "牛", "虎", "兔", "龍", "蛇", "馬", "羊")
Zodiac = ZodiacList(birthyear Mod 12)
End If
End Function
%>
復(fù)制代碼 代碼如下:
<%
Function Zodiac(birthday)
If IsDate(birthday) Then
birthyear = Year(birthday)
ZodiacList = Array("猴", "雞", "狗", "豬", "鼠", "牛", "虎", "兔", "龍", "蛇", "馬", "羊")
Zodiac = ZodiacList(birthyear Mod 12)
End If
End Function
%>
相關(guān)文章
ASP 相關(guān)文章或者相關(guān)產(chǎn)品
以下僅提供相關(guān)思路和關(guān)鍵代碼,并且只提供一種最簡單的算法實現(xiàn),稍復(fù)雜的本文不做介紹。2009-05-05ASP下通過Adodb.Stream實現(xiàn)多線程下載大文件
這篇文章主要介紹了ASP下通過Adodb.Stream實現(xiàn)多線程下載大文件,需要的朋友可以參考下2020-08-08Highlight patterns within strings
Highlight patterns within strings...2007-04-04用asp實現(xiàn)把文件打包成Xml文件包,帶解包的ASP工具附下載
用asp實現(xiàn)把文件打包成Xml文件包,帶解包的ASP工具附下載...2007-06-06