asp获取域名

<%
"获取域名，并变为小写
domain=lcase(request.servervariables("HTTP_HOST"))
"域名为aaa.com时进入apath
"之所以要使用instr(domain,"aaa.com")>0来判断，是因为有www.aaa.com和aaa.com二种方式访问
if instr(domain,"aaa.com")>0 then
response.redirect "apath/"
"域名为bbb.com时进入bpath
elseif instr(domain,"bbb.com")>0 then
response.redirect "bpath/"
"域名为ccc.com时进入cpath
elseif instr(domain,"ccc.com")>0 then
response.redirect "cpath/"
end if
%>