<%
dim realTitle
realTitle="江西生活网 老百姓的网 WWW.JXLIFE.CN" '默认标题
dim serverName
serverName=request.ServerVariables("SERVER_NAME")
select case lcase(serverName)
case "ly.jxlife.cn"
realTitle="旅游频道 江西生活网 老百姓的网 WWW.JXLIFE.CN"
case "qc.jxlife.cn"
realTitle="汽车频道 江西生活网 老百姓的网 WWW.JXLIFE.CN"
case "qy.jxlife.cn"
realTitle="企业在线 江西生活网 老百姓的网 WWW.JXLIFE.CN"
case "sj.jxlife.cn"
realTitle="商家导航 江西生活网 老百姓的网 WWW.JXLIFE.CN"
case else
realTitle=""
end select
%>
