泛解析域名需要三个环节,首先是域名指向要泛解析,二是服务器主机头绑定要泛绑定,也就是绑定一个空主机头的主机(iis),三就是程序进行分析判断访问域名,进行对子域名的跳转。
下面代码是今天给朋友写的一段asp代码,可保存成default.asp文件放到根目录,主要做子域名跳转用,判断是子域名就跳转到对应子目录的对应默认文件。
- <%
- '悟空的博客原创代码,www.7es.cn 欢迎交流沟通泛域名解析方法
- dim domain ,offset,subdir
- domain = Request.ServerVariables("SERVER_NAME") '获取访问域名'找到子域名,也就是主机头
- subdir = "www"
- offset = instr(domain,"7es.cn")-2 '这里的域名改成自己的
- if offset>0 then
- subdir = left(domain, offset)
- end if
- if subdir <> "www" then
- Server.Transfer subdir & "/index.html" '这里的index.htm是目录里默认文件名,可以根据需要修改
- else
- Server.Transfer "/index.html" 'www主站域名
- end if
- %>