前几天，为了增强本站的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中包含此文件，搞定。

　　推荐阅读

　　asp下查询xml的实现代码

现在有一个xml，格式如下： <date> <item> <id> 1 </id> <name> ABC </name> </item> <item> <id> 2 </id> <name> cde </name> </item> <item> <id> 3 </id> <name> efg </name> </item> </date> 我用ASP查询id=2，>>>详细阅读

本文标题：实用301转向到另一域名相应页面的asp代码

地址：http://www.17bianji.com/kaifa2/ASP/32142.html

 1/2    1