asp下同一空間多綁多哥域名的方法

同一空間多綁一個域名

複製代碼代碼如下:

<%

CheckDomain

SubCheckDomain()

dimsDomain

sDomain=Request.ServerVariables("HTTP_HOST")

IfInstr(sDomain,"a.xxx.com")>0thenResponse.Redirect"a/"

EndSub

%>

同一空間多綁二個域名

複製代碼代碼如下:

<%

CheckDomain

SubCheckDomain()

dimsDomain

sDomain=Request.ServerVariables("HTTP_HOST")

IfInstr(sDomain,"a.xxx.com")>0then

Response.Redirect"a/"

ElseifInstr(sDomain,"b.xxx.com")>0then

Response.Redirect"b/"

EndIf

EndSub

%>

同一空間多綁三個域名

複製代碼代碼如下:

<%

CheckDomain

SubCheckDomain()

dimsDomain

sDomain=Request.ServerVariables("HTTP_HOST")

IfInstr(sDomain,"a.xxx.com")>0then

Response.Redirect"a/"

ElseifInstr(sDomain,"b.xxx.com")>0then

Response.Redirect"b/"

ElseifInstr(sDomain,"c.xxx.com")>0then

Response.Redirect"c/"

EndIf

EndSub

%>

您可能感興趣的文章: