实用301转向到另一域名相应页面的asp代码

从一个域名301转向另外一个域名的方法

答案：前几天，着手把另一个域名：www.zhaoxi.net下的所有页面301转向到www.zzzyk.com下。 
由于本站目前只有一个博客，于是从博客上入手。 思路很简单，获取当前浏览页面的域名，如果是需要转向的域名，再替换域名部分，做为新地址来301转向。 

 
<% 
Dim toDomain,fromDomain,curDomain,q,p,url 
toDomain=www.zzzyk.com 
fromDomain="zhaoxi.net" 
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=zhaoxi.net" 
if q<>"" then url=url&"&"&q 
Response.Status="301 Moved Permanently" 
Response.AddHeader "Location",url 
Response.end() 
End If 
%>

特意在url上加了个参数，是为了记录有多少个访问是从这个域名访问的。 
　　将此文件保存成asp文件，包含任一要跳转的ASP页面中即可。 
　　博客中，都有调用公用数据库连接文件conn.asp，我就在conn.asp中包含此文件，搞定。 

上一个：asp伪继承初探_实例代码
下一个：asp生成带有样式的word文件方法