<% select case request.servervariables("http_host") case " www.xxdxft.cn" '域名1 Server.Transfer("/show/index.asp") case " show.xxdxft.cn" '域名2 Server.Transfer("blog/index.asp") case " www.xxdxft.net" '域名3 Server.Transfer("bbs/index.asp") '...... 继续添加 ...... case else '域名N Server.Transfer("XXX/index.asp") end select %>