ASP写一个与时间相关的小函数,用来根据生日计算星座,你可以按指定格式输入一个包含年、月、日的时间字符串后,通过本函数可返回星座信息。
function constellation(month1,day2) 'if IsDate(birthday) then ConstellationMon=month1 ConstellationDay=day2 if Len(ConstellationMon)<2 then ConstellationMon="0"&ConstellationMon if Len(ConstellationDay)<2 then ConstellationDay="0"&ConstellationDay MyConstellation=ConstellationMon&ConstellationDay if MyConstellation < 0120 then constellation="魔羯座 <img src=../images/Constellation/g.gif title='魔羯座 Capricorn'>" elseif MyConstellation < 0219 then constellation="水瓶座 <img src=../images/Constellation/h.gif title='水瓶座 Aquarius'>" elseif MyConstellation < 0321 then constellation="双鱼座 <img src=../images/Constellation/i.gif title='双鱼座 Pisces'>" elseif MyConstellation < 0420 then constellation="白羊座 <img src=../images/Constellation/^.gif title='白羊座 Aries'>" elseif MyConstellation < 0521 then constellation="金牛座 <img src=../images/Constellation/_.gif title='金牛座 Taurus'>" elseif MyConstellation < 0622 then constellation="双子座 <img src=../images/Constellation/`.gif title='双子座 Gemini'>" elseif MyConstellation < 0723 then constellation="巨蟹座 <img src=../images/Constellation/a.gif title='巨蟹座 Cancer'>" elseif MyConstellation < 0823 then constellation="狮子座 <img src=../images/Constellation/b.gif title='狮子座 Leo'>" elseif MyConstellation < 0923 then constellation="处女座 <img src=../images/Constellation/c.gif title='处女座 Virgo'>" elseif MyConstellation < 1024 then constellation="天秤座 <img src=../images/Constellation/d.gif title='天秤座 Libra'>" elseif MyConstellation < 1122 then constellation="天蝎座 <img src=../images/Constellation/e.gif title='天蝎座 Scorpio'>" elseif MyConstellation < 1222 then constellation="射手座 <img src=../images/Constellation/f.gif title='射手座 Sagittarius'>" elseif MyConstellation > 1221 then constellation="魔羯座 <img src=../images/Constellation/g.gif title='魔羯座 Capricorn'>" end if ' end if end function
函数用法示例,以上面的生日时间为测试数据,调用函数如下:<%=Constellation("2016-11-22")%>,函数内将输出“星座”和一张代表星座的图片。