根據(jù)日期得到生肖的ASP函數(shù)
更新時間：2008年01月18日 14:37:46 作者：
最近公司開放網站需要用到根據(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
%>
復制代碼 代碼如下:
<%
Function Zodiac(birthday)
If IsDate(birthday) Then
birthyear = Year(birthday)
ZodiacList = Array("猴", "雞", "狗", "豬", "鼠", "牛", "虎", "兔", "龍", "蛇", "馬", "羊")
Zodiac = ZodiacList(birthyear Mod 12)
End If
End Function
%>
相關文章
過濾非法的SQL字符，防止sql注入等。里面的體會思路主要運用了批量替換，是個不錯的思路。2010-05-05
支持加號空格的查詢...2006-08-08
以下僅提供相關思路和關鍵代碼，并且只提供一種最簡單的算法實現(xiàn)，稍復雜的本文不做介紹。2009-05-05
ASP下通過Adodb.Stream實現(xiàn)多線程下載大文件
這篇文章主要介紹了ASP下通過Adodb.Stream實現(xiàn)多線程下載大文件,需要的朋友可以參考下2020-08-08
Highlight patterns within strings
Highlight patterns within strings...2007-04-04
隨機調用n條數(shù)據(jù)的方法分析...2007-07-07
TSYS中生成靜態(tài)頁時溢出: ''CInt''...2007-01-01
kesion科訊V4.0管理員Key工具...2007-08-08
用asp實現(xiàn)把文件打包成Xml文件包，帶解包的ASP工具附下載
用asp實現(xiàn)把文件打包成Xml文件包，帶解包的ASP工具附下載...2007-06-06
2008-01-01