DDR爱好者之家

实用301转向到另一域名相应页面的asp代码
站长资源 2024/12/30 佚名
62 1538
DDR爱好者之家 Design By 杰米
前几天，为了增强本站的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中包含此文件，搞定。
DDR爱好者之家 Design By 杰米
广告合作：本站广告合作请联系QQ：858582 申请时备注：广告合作（否则不回）
免责声明：本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除！
DDR爱好者之家 Design By 杰米
ddrfans.com DDR爱好者之家
8,675无损音乐
1,324高清电影
213破解软件
70,141收录资讯

更新日志

友情链接

杰晶网络 DDR爱好者之家 南强小屋 黑松山资源网 白云城资源网
DDR爱好者之家 Design By 杰米