实用301转向到另一域名相应页面的asp代码
来源:asp之家 时间:2011-04-18 10:42:00
前几天,为了增强本站的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中包含此文件,搞定。
标签:301,转向,asp
0
投稿
猜你喜欢
可用性研究:为文字链接扩大可点击区域
2008-09-18 18:23:00
Dreamweaver MX技巧之超链接
2009-05-29 18:40:00
《悟透JavaScript》之 甘露模型
2008-06-09 14:03:00
画好线框图的20个步骤
2009-09-01 19:46:00
XML入门教程:XML CDATA的作用
2007-11-07 14:08:00
Oracle 启动例程 STARTUP参数说明
2009-07-07 10:26:00
IE6终极备忘单——对IE6单独兼容[译]
2010-01-21 18:34:00
Shellcode加密解密函数
2009-04-24 11:18:00
浅析“Rich”设计模式
2009-03-12 12:36:00
关于SQL Server数据库中转储设备分析
2009-01-21 14:55:00
[组图]手把手教你制作ASP留言本
2007-09-22 09:32:00
经典分享MySQL的limit查询优化
2011-05-05 15:47:00
特别推荐:Web开发常用速查手册大全(100+)
2011-05-06 12:44:00
小白讲座:在win下mysql备份恢复命令概括
2009-09-05 09:43:00
Oracle学习笔记(一)
2012-01-05 18:51:44
asp如何做一个随机密码产生器?
2010-07-12 18:57:00
ASP如何获取通过代理的真实IP地址
2007-09-20 13:11:00
使用Dreamweaver MX表格排序功能
2010-07-13 12:08:00
搜索关键字加亮js实现方法
2007-08-27 14:11:00
Sql Server 和 Access 操作数据库结构Sql语句
2008-02-11 18:59:00