手机
当前位置:查字典教程网 >编程开发 >ASP教程 >实用301转向到另一域名相应页面的asp代码
实用301转向到另一域名相应页面的asp代码
摘要:前几天,为了增强本站的SEO,着手把另一个域名:www.kanshule.com下的所有页面301转向到www.jb51.net下。由于本站...

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

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

思路很简单,获取当前浏览页面的域名,如果是需要转向的域名,再替换域名部分,做为新地址来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

Response.Status="301 Moved Permanently"

Response.AddHeader "Location",url

Response.end()

End If

%>

特意在url上加了个参数,是为了记录有多少个访问是从这个域名访问的。

将此文件保存成asp文件,包含任一要跳转的ASP页面中即可。

博客中,都有调用公用数据库连接文件conn.asp,我就在conn.asp中包含此文件,搞定。

【实用301转向到另一域名相应页面的asp代码】相关文章:

一些值得一看的代码asp

用VB生成DLL封装ASP连接数据库的代码

ASP下实现自动采集程序及入库的代码

一段几乎可以让你死机的JS代码

用ASP创建MDaemon用户的代码

Asp中代码与页面的分离

用ASP读取/写入UTF-8编码格式的文件

判断字符串中相同字符的个数

ASP动态生成的javascript表单验证代码

实例分析之用ASP编程实现网络内容快速查找的代码

精品推荐
分类导航