西蜀蜘蛛SEM博客

关于301转向方法，其实在网上能找到的方法非常多，但是具体到实际中来却也不是那么简单。网上的内容大多是关于301转向的代码，却没具体的操作方法和例子，这就初学者或者对程序语言不熟悉的朋友带来了很大的麻烦。这几天，集团公司启用了全新的域名，正好需要来处理一下多域名转向的事情，Lonmen这里就写出来与大伙分享。

首先来说我一下，我要实现的目标：
1、从地址栏上试问www.1100n.com时，网址自转跳转到www.168star.com.cn 并要求返回给服务器的状态为301。
2、从被搜索引擎收录的页面试问网站时，网址自动跳到新网址所对应的ID，并返回301状态。
考虑了一下，其实上面两个问题只是一个问题，就是要保证无论用何种方式试问网站里，要跳到新的域名下显示。

实现方法分析：
集团网站为ASP程序，并且有一个公用文件CONN.ASP。这样一来就比较好办了，我们只需写一个程序检查浏览的地址当其为旧域名时对进行替换成新域名，并301向新的域名就可以了。

具体的方法：

<%  Dim toDomain,fromDomain,curDomain,q,p,url  toDomain=www.jb51.net  fromDomain="kanshule.com"  curDomain=Request.ServerVariables("HTTP_HOST")  if instr(curDomain,fromDomain)>0 then  q=Request.ServerVariables("QUERY_STRING")  p=Request.ServerVariables("URL")  url="http://"&toDomain&p&"?furl=kanshule.com"  if q<>"" then url=url&"&"&q '在url上加了个参数，记录下有多少个访问是从这个域名来的 Response.Status="301 Moved Permanently"  Response.AddHeader "Location",url  Response.end()  End If  %> 

将此文件保存成asp文件，包含任一要跳转的ASP页面中即可。因集团公司的网站公用文件为CONN.ASP我是其它包涵在了这里面。
最后，上传到你的服务器，大功告成。输入旧域名或者从搜索引擎上site你的站，点击进入，是不是全部跳转到了新的域名呢！