📄 birthday.asp
字号:
<%
function astro(birth)
on error resume next
dim birthday,birthmonth
birthday=day(birth)
birthmonth=month(birth)
select case birthmonth
case 1
if birthday>=21 then
astro="<img src=star/z11.gif alt=水瓶座"&birth&">"
else
astro="<img src=star/z10.gif alt=魔羯座"&birth&">"
end if
case 2
if birthday>=20 then
astro="<img src=star/z12.gif alt=双鱼座"&birth&">"
else
astro="<img src=star/z11.gif alt=水瓶座"&birth&">"
end if
case 3
if birthday>=21 then
astro="<img src=star/z1.gif alt=白羊座"&birth&">"
else
astro="<img src=star/z12.gif alt=双鱼座"&birth&">"
end if
case 4
if birthday>=21 then
astro="<img src=star/z2.gif alt=金牛座"&birth&">"
else
astro="<img src=star/z1.gif alt=白羊座"&birth&">"
end if
case 5
if birthday>=22 then
astro="<img src=star/z3.gif alt=双子座"&birth&">"
else
astro="<img src=star/z2.gif alt=金牛座"&birth&">"
end if
case 6
if birthday>=22 then
astro="<img src=star/z4.gif alt=巨蟹座"&birth&">"
else
astro="<img src=star/z3.gif alt=双子座"&birth&">"
end if
case 7
if birthday>=23 then
astro="<img src=star/z5.gif alt=狮子座"&birth&">"
else
astro="<img src=star/z4.gif alt=巨蟹座"&birth&">"
end if
case 8
if birthday>=24 then
astro="<img src=star/z6.gif alt=处女座"&birth&">"
else
astro="<img src=star/z5.gif alt=狮子座"&birth&">"
end if
case 9
if birthday>=24 then
astro="<img src=star/z7.gif alt=天秤座"&birth&">"
else
astro="<img src=star/z6.gif alt=处女座"&birth&">"
end if
case 10
if birthday>=24 then
astro="<img src=star/z8.gif alt=天蝎座"&birth&">"
else
astro="<img src=star/z7.gif alt=天秤座"&birth&">"
end if
case 11
if birthday>=23 then
astro="<img src=star/z9.gif alt=射手座"&birth&">"
else
astro="<img src=star/z8.gif alt=天蝎座"&birth&">"
end if
case 12
if birthday>=22 then
astro="<img src=star/z10.gif alt=魔羯座"&birth&">"
else
astro="<img src=star/z9.gif alt=射手座"&birth&">"
end if
case else
astro=""
end select
end function
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -