同一空间多绑一个域名复制代码 代码如下:<% CheckDomain Sub CheckDomain() dim sDomain sDomain = Request.ServerVariables("HTTP_HOST") If Instr(sDomain,"a.xxx.com")>0 then Response.Redirect "a/" End Sub %> 同一空间多绑二个域名 复制代码 代码如下:<% CheckDomain Sub CheckDomain() dim sDomain sDomain = Request.ServerVariables("HTTP_HOST") If Instr(sDomain,"a.xxx.com")>0 then Response.Redirect "a/" Elseif Instr(sDomain,"b.xxx.com")>0 then Response.Redirect "b/" End If End Sub %> 同一空间多绑三个域名 复制代码 代码如下:<% CheckDomain Sub CheckDomain() dim sDomain sDomain = Request.ServerVariables("HTTP_HOST") If Instr(sDomain,"a.xxx.com")>0 then Response.Redirect "a/" Elseif Instr(sDomain,"b.xxx.com")>0 then Response.Redirect "b/" Elseif Instr(sDomain,"c.xxx.com")>0 then Response.Redirect "c/" End If End Sub %>
推荐阅读
javascript asp教程服务器对象
Overview:
The Server Object has seven (7) Methods, one (1) Property, zero (0) Events, and zero (0) Collections.
List of Methods:
Server Methods
CreateObject( )
Server.CreateObject("ADODB.Reco>>>详细阅读
本文标题:asp下同一空间多绑多哥域名的方法
地址:http://www.17bianji.com/kaifa2/ASP/32701.html
1/2 1