


<%@LANGUAGE="VBscript"%>
<%
dim url
url=Request.ServerVariables("HTTP_HOST")
select case url
case "izaoi.com" ''要转发的域名
Response.Status="301 Moved Permanently"
Response.AddHeader "Location","http://www.seocaifu.com/"
Response.End
case "www.Tianweb.com" ''要转发的域名
Response.Status="301 Moved Permanently"
Response.AddHeader "Location","http://www.seocaifu.com/"
Response.End
case "zzzszx.cn" ''要转发的域名
Response.Status="301 Moved Permanently"
Response.AddHeader "Location","http://www.seocaifu.com/"
Response.End
end select
%>
---------------------------------------
以上代码里,把“seocaifu.com”"Tianweb.com"分别写成你自己的域名就成了,这个代码可以实现多个域名,只一个虚拟空间的朋友用。


