asp下同一空間多綁多哥域名的方法
更新時間:2007年03月03日 00:00:00 作者:
同一空間多綁一個域名
<%
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
%>
復制代碼 代碼如下:
<%
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
%>
您可能感興趣的文章:
相關(guān)文章
ASP Recordset 分頁顯示數(shù)據(jù)的方法(修正版)
最近給別人培訓asp 分頁,對于asp的入門新手來說,最簡單的分頁就是用Recordset 分頁技術(shù)了,他主要用于一些少量數(shù)據(jù)的分頁,對于新手學習是最好的了,對于大量數(shù)據(jù)分頁不建議用。2008-11-11
ASP編程入門進階(二十):ADO組件之插入數(shù)據(jù)記錄
ASP編程入門進階(二十):ADO組件之插入數(shù)據(jù)記錄...2007-01-01

