多域名绑定到一个空间访问不同首页的技巧

Dim cc_str_host_name
cc_str_host_name = LCase(Request.ServerVariables("HTTP_HOST"))
'判断主机名进行跳转
Select Case cc_str_host_name
  Case "www.kuozhanming.com"
    Server.Transfer "main.asp"
  Case "www.suoxie.com"
    Server.Transfer "main_2.asp"
  Case Else
    Server.Transfer "main_3.asp"
End Select