如果有有一个ASP空间,而你又想放置多个多个站点,这些代码可以帮到你 第一个 %if Request.ServerVariables("SERVER_NAME")="bbs.along.com.ru" then response.redirect "bbs" else response.redirect "index1.htm" end if%>
第二个 % select case request.servervariables("http_host") case "www.along.com.ru" '1 Server.Transfer("along.htm") case "www.along.net.ru" '2 Server.Transfer("net.htm") case "www.null.com.ru" '3 Server.Transfer("null.htm") ...... 继续添加 ...... end select %>
第三个 %if instr(Request.ServerVariables ("SERVER_NAME"),"fjsky.info")>0 then response.redirect "index.asp" else if instr(Request.ServerVariables ("SERVER_NAME"),"along.com.ru")>0 then response.redirect "x/index.asp" else if instr(Request.ServerVariables ("SERVER_NAME"),"along.net.ru")>0 thenr esponse.redirect "index3.asp" end if end if end if%>
第四个 %if Request.ServerVariables("SERVER_NAME")="www.fjsky.info" then response.redirect "main1.asp" else if Request.ServerVariables("SERVER_NAME")="fjsky.info" then response.redirect "main1.asp" else if Request.ServerVariables("SERVER_NAME")="www.null2.com.ru" then response.redirect "/web/index.asp" else if Request.ServerVariables("SERVER_NAME")="null2.com.ru" then response.redirect "/web/index.asp" end if end if end if end if%>
第五个 % '取得HTTP输入的值并付值到HTOST中 host=lcase(request.servervariables("HTTP_HOST")) '开始条件跳转 SELECT CASE host ' 如果HOST的值是www.iswind.net就选择事件case"www.iswind.net"的命令 CASE "www.abc.net" ' Below is the redirect command response.redirect "web/" CASE "www.efd.com" response.redirect "web1/" 'We use CASE ELSE to fix any other requests CASE ELSE response.redirect "web1/" END SELECT %>