多个域名解析服务器,一台服务器上多个泛域名解析的方法

以前有人问过，重新贴出来吧。也许大家用得到。

这个程序适用于同一主机上放任意多个oblog站点，甚至可以用这个程序给别人提供解析服务，呵呵。

欢迎大家讨论。

各个blog的主机头都不要设置为空，都各自填好自己的域名。

然后再新建一个站点，把主机头设为空，在这个站点使如下的default.asp

Dim fromURL, subName, domainName, userDomainRoot

fromURL = LCase(Replace(Request.ServerVariables("SERVER_NAME"), "www.", ""))

subName = Split(fromURL, ".")

domainName = subName(0)

Select Case UBound(subName)

Case 2:’二级域名

userDomainRoot = subName(1)&"."&subName(2)&"/"

‘ userDomainRoot = "www."& userDomainRoot

‘如果你的blog站点是www开头的，那么请开放上边一句

‘如果是其他二级域名，请再将www.改为对应的二级域名，比如blog.

Case 3:’三级域名

userDomainRoot = subName(1)&"."&subName(2)&"."&subName(3)&"/"

End Select

response.Write( "

")

‘response.redirect "http://"&UserDomainRoot&"blog.asp?domain="&FromURL

%>