asp实现同网站不同目录帮定不同域名

asp实现同网站不同目录帮定不同域名
代码如下:
<%
select case request.servervariables("http_host")
case "knowsky.com"
Server.Execute("index.html")
case "code.knowsky.com"
Server.Execute("ut/index.html")
case "font.knowsky.com"
Server.Execute("utxiazai/index.html")
case "moban.knowsky.com"
Server.Execute("ut30/index.html")
case "pages.knowsky.com"
Server.Execute("ut30xiazai/index.html")
case "sucai.knowsky.com"
Server.Execute("ut20/index.html")
case "soft.knowsky.com"
Server.Execute("xinlangutxiazai/index.html")
case else
Server.Transfer("index.html")
end select
%>