精美而实用的网站,关注web编程技术、网站运营、SEO推广,让您轻松愉快的学习

ASP写一个与时间相关的小函数,用来根据生日计算星座,你可以按指定格式输入一个包含年、月、日的时间字符串后,通过本函数可返回星座信息。

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="魔羯座&nbsp;<img src=../images/Constellation/g.gif title='魔羯座 Capricorn'>"
        elseif MyConstellation < 0219 then
            constellation="水瓶座&nbsp;<img src=../images/Constellation/h.gif title='水瓶座 Aquarius'>"
        elseif MyConstellation < 0321 then
            constellation="双鱼座&nbsp;<img src=../images/Constellation/i.gif title='双鱼座 Pisces'>"
        elseif MyConstellation < 0420 then
            constellation="白羊座&nbsp;<img src=../images/Constellation/^.gif title='白羊座 Aries'>"
        elseif MyConstellation < 0521 then
            constellation="金牛座&nbsp;<img src=../images/Constellation/_.gif title='金牛座 Taurus'>"
        elseif MyConstellation < 0622 then
            constellation="双子座&nbsp;<img src=../images/Constellation/`.gif title='双子座 Gemini'>"
        elseif MyConstellation < 0723 then
            constellation="巨蟹座&nbsp;<img src=../images/Constellation/a.gif title='巨蟹座 Cancer'>"
        elseif MyConstellation < 0823 then
            constellation="狮子座&nbsp;<img src=../images/Constellation/b.gif title='狮子座 Leo'>"
        elseif MyConstellation < 0923 then
            constellation="处女座&nbsp;<img src=../images/Constellation/c.gif title='处女座 Virgo'>"
        elseif MyConstellation < 1024 then
            constellation="天秤座&nbsp;<img src=../images/Constellation/d.gif title='天秤座 Libra'>"
        elseif MyConstellation < 1122 then
            constellation="天蝎座&nbsp;<img src=../images/Constellation/e.gif title='天蝎座 Scorpio'>"
        elseif MyConstellation < 1222 then
            constellation="射手座&nbsp;<img src=../images/Constellation/f.gif title='射手座 Sagittarius'>"
        elseif MyConstellation > 1221 then
            constellation="魔羯座&nbsp;<img src=../images/Constellation/g.gif title='魔羯座 Capricorn'>"
        end if
'   end if
end function

函数用法示例,以上面的生日时间为测试数据,调用函数如下:<%=Constellation("2016-11-22")%>,函数内将输出“星座”和一张代表星座的图片。

Tags:ASP 星座 函数