网络编程
位置:首页>> 网络编程>> Asp编程>> 实用301转向到另一域名相应页面的asp代码

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

 来源:asp之家 发布时间:2011-04-18 10:42:00 

标签:301,转向,asp

前几天,为了增强本站的SEO,着手把另一个域名:www.aspxhome.com下的所有页面301转向到www.cidianwang.com下。

由于本站目前只有一个博客,于是从博客上入手。

思路很简单,获取当前浏览页面的域名,如果是需要转向的域名,再替换域名部分,做为新地址来301转向。

代码如下:

<% 
Dim toDomain,fromDomain,curDomain,q,p,url 
toDomain=www.cidianwang.com 
fromDomain="aspxhome.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=aspxhome.com" 
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中包含此文件,搞定。

0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com