空间内默认首页(通常是 index.asp 或 default.asp )使用 Request.ServerVariables("HTTP_HOST") 获取用户访问时所使用域名,然后使用 Select 调用不同文件,可用 Response.Redirect 或 Server.Transfer
例子:
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