2005年7月18日星期一

多个绑定多域名的ASP代码

  如果只有一个ASP空间,而你又想放置多个多个站点,这些代码可以帮到你。

第一个
<%
if Request.ServerVariables("SERVER_NAME")="www.williamlong.info" then
 response.redirect "williamlong/index.htm"
else
 response.redirect "index2.htm"
end if
%>

 

第二个
<%
select case request.servervariables("http_host")
case "www.williamlong.info" '1
 Server.Transfer("v3.htm")
case "www.williamlong.info" '1
 Server.Transfer("v3.htm")
case "www.moon-soft.com" '2
 Server.Transfer("i.htm")
case "www.moon-blog.com" '3
 Server.Transfer("moon-blog.htm")
...... 继续添加 ......
end select
%>

第三个
<%
if instr(Request.ServerVariables("SERVER_NAME"),"www.williamlong.info")>0 then
 response.redirect "index.asp"
elseif instr(Request.ServerVariables("SERVER_NAME"),"www.moon-soft.com")>0 then
 response.redirect "x/index.asp"
elseif instr(Request.ServerVariables("SERVER_NAME"),"www.moon-blog.com")>0 then
 response.redirect "index3.asp"
end if
%>

第四个
<%
if Request.ServerVariables("SERVER_NAME")="www.williamlong.info" then
 response.redirect "index1.asp"
elseif Request.ServerVariables("SERVER_NAME")="www.moon-soft.com" then
 response.redirect "index2.asp"
elseif Request.ServerVariables("SERVER_NAME")="www.moon-blog.com" then
 response.redirect "index3.asp"
end if
%>

第五个
<%
if Request.ServerVariables("SERVER_NAME")="www.williamlong.info" then
 Server.Transfer("williamlong.htm")
elseif Request.ServerVariables("SERVER_NAME")="www.moon-soft.com" then
 Server.Transfer("moon.htm")
elseif Request.ServerVariables("SERVER_NAME")="www.moon-blog.com" then
 Server.Transfer("moon-blog.htm")
else
 Server.Transfer("other.htm")
end if
%>