推荐下天枫常用ASP函数封装，推荐大家使用

306/16/5020158900.gif title=''魔羯座 Capricorn''>"
elseif MyConstellation < 0219 then
constellation="<img src=/uploadfile/201306/16/4820157714.gif title=''水瓶座 Aquarius''>"
elseif MyConstellation < 0321 then
constellation="<img src=/uploadfile/201306/16/2620157958.gif title=''双鱼座 Pisces''>"
elseif MyConstellation < 0420 then
constellation="<img src=/uploadfile/201306/16/1D20157283.gif title=''白羊座 Aries''>"
elseif MyConstellation < 0521 then
constellation="<img src=/uploadfile/201306/16/E620157489.gif title=''金牛座 Taurus''>"
elseif MyConstellation < 0622 then
constellation="<img src=/uploadfile/201306/16/C120157195.gif title=''双子座 Gemini''>"
elseif MyConstellation < 0723 then
constellation="<img src=/uploadfile/201306/16/5320158778.gif title=''巨蟹座 Cancer''>"
elseif MyConstellation < 0823 then
constellation="<img src=/uploadfile/201306/16/7120158845.gif title=''狮子座 Leo''>"
elseif MyConstellation < 0923 then
constellation="<img src=/uploadfile/201306/16/9D20158783.gif title=''处女座 Virgo''>"
elseif MyConstellation < 1024 then
constellation="<img src=/uploadfile/201306/16/FA20158955.gif title=''天秤座 Libra''>"
elseif MyConstellation < 1122 then
constellation="<img src=/uploadfile/201306/16/9D20158184.gif title=''天蝎座 Scorpio''>"
elseif MyConstellation < 1222 then
constellation="<img src=/uploadfile/201306/16/7120158599.gif title=''射手座 Sagittarius''>"
elseif MyConstellation > 1221 then
constellation="<img src=/uploadfile/201306/16/5020158900.gif title=''魔羯座 Capricorn''>"
end if
end if
End Function

''=================================================
''函数名：autopage
''作 用：长文章自动分页
''参 数：id,content,urlact
''=================================================
Function AutoPage(content,paramater,pagevar)
contentStr=split(content,pagevar)
pagesize=ubound(contentStr)
if pagesize>0 then
If Int(Request("page"))="" or Int(Request("page"))=0 Then
pageNum=1
Else
pageNum=Request("page")
End if
if pageNum-1<=pagesize then
AutoPage=AutoPage&contentStr(pageNum-1)
AutoPage=AutoPage&"<div style=""margin-top:10px;text-align:right;padding-right:15px;""><font color=blue>页码:</font><font color=red>"
For i=0 to pagesize
if i=pageNum-1 then
AutoPage=AutoPage&"[