当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp下同一空间多绑多哥域名的方法

ASP
Microsoft 脚本编码器(3) --- 使用脚本编码器
WAP中的ASP技术(一)
WAP中的ASP技术(二)
WAP中的ASP技术(三)
WAP中的ASP技术(四)
在ADO使用SELECT语法一
在ADO使用SELECT语法二
在ADO使用SELECT语法三
在ADO使用SELECT语法四
在ADO使用SELECT语法五
在ADO使用SELECT语法六
Asp+语法介绍(六)----数据库篇
vbscript错误代码及对应解释大全
ASP系列讲座(三)创建 ASP 页
ASP系列讲座(四)使用脚本语言
ASP系列讲座(五)使用变量和常量
ASP系列讲座(六)编写过程
ASP系列讲座(七)使用组件和对象
ASP系列讲座(八)使用集合
ASP系列讲座(九)设置对象作用域

ASP 中的 asp下同一空间多绑多哥域名的方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 181 ::
收藏到网摘: n/a

同一空间多绑一个域名
复制代码 代码如下:

<%
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
%>