如果只有一个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.write100.com" ‘3
Server.Transfer("write100.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.write100.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.write100.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.write100.com" then
Server.Transfer("write100.htm")
else
Server.Transfer("other.htm")
end if
%>

 

 


本文章由雨豪博客撰写,采用CC授权分享,转载时请注明原文链接。
本文链接: http://www.wx35.cn/archives/116/

随机文章

Comments

Comments are closed.