用程序的方式實現url轉發功能

<%
dim url
url=Request.ServerVariables("HTTP_HOST")
select case url
 case "www.xxxx.com" ''要轉發的域名
     urla = "http://www.xx.com/bbs/" ''轉發的目標地址
  response.Write""
    case "www.aaaa.com" ''要轉發的域名
     urlb = "http://www.xx.com/music/" ''轉發的目標地址
     response.Write""
end select
%>
將以上的代碼放到站點首頁文件的頂部就可以了