一個(gè)虛拟主機上(shàng)綁定了多(duō)個(gè)域名,如果想讓其中一個(gè)域名直達根目錄下的其中一個(gè)目錄,可(kě)以用如下方式實現:
<%
dim url
url=Request.ServerVariables("HTTP_HOST")
select case url
case "www.xxxx.com" ''要轉發的域名
urla = "http://www.xx.com/bbs/"; ''轉發的目标地址
response.Write"<frameset rows=*><frame scrolling=auto src="&urla&"></frameset>"
case "www.aaaa.com" ''要轉發的域名
urlb = "http://www.xx.com/music/"; ''轉發的目标地址
response.Write"<frameset rows=*><frame scrolling=auto src="&urlb&"></frameset>"
end select
%>
将以上(shàng)的代碼放到站點首頁文件的頂部就可(kě)以了