★SEOWHY系统培训,第六期报名进行中★★★周三:百度是否更新了你的收录量?★★通过SEO创业的赢利模式
发新话题
打印

关于301重定向,问题解决(asp空间)

关于301重定向,问题解决(asp空间)

大部分的个人站长都是租的虚拟空间吧,而且是asp空间。
本人的也是,前一段时间google收录了029dogoo.com,就是不收录www.029dogoo.com
问老大怎麽回事,老大说是url重定向问题,自己找了很多办法就是解决不了,很是郁闷。
今天上网无意中搜了搜,结果找到了解决问题的办法。
现在在地址栏敲029dogoo.com就直接转到了www.029dogoo.com
呵呵,很是开心,问题解决.
现在分享出来,希望对个人站长有所帮助,如下:
ASP语言下,我们需要在默认首页,如index.asp顶部最上方加入以下代码:
<%
Dim dm,sn
dm=Request.ServerVariables("Server_name")  '获取域名
'这里的3是指www的长度
if left(dm,3)<>"www" then
Response.Status="301 Moved Permanently"
Response.AddHeader "Location", "http://www.029dogoo.com"
Response.End
end if
%>

就这么简单,本人网站已经解决了这个问题。只要把www.029dogoo.com改为你的网站就好了。
本帖最近评分记录
  • seo 威望 +1 多动手,动脑,这样才是学SEO的好方法 2008-9-3 00:58
西安导购网(http://www.029dogoo.com)西安一流的导购平台!
补充:二级页面的301重定向问题(还是租的asp虚拟空间):
比如:http://029dogoo.com/flower.asp?aid=20&nid=315(本人网站的商家秀场栏目属于二级页面)就没有含www,这个问题如何解决,也把http://029dogoo.com/flower.asp?aid=20&nid=315转换为http://www.029dogoo.com/flower.asp?aid=20&nid=315
也搜到了答案,不过还没有实践。如下:
把一下这段代码放入一个公用文件里,用include引用到需要做重定向的页面。

<%
Dim dm,sn
dm=Request.ServerVariables("Server_name")  '获取域名
'这里的3是指www的长度
if left(dm,3)<>"www" then
Response.Status="301 Moved Permanently"
Response.AddHeader "Location", GetUrl()
Response.End
end if

'获取当前Url参数的函数
Function GetUrl()
  Dim ScriptAddress,Servername,qs
  ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME"))
  Servername = CStr(Request.ServerVariables("Server_Name"))
  qs=Request.QueryString
  if qs<>"" then
  GetUrl ="http://www."& Servername & ScriptAddress &"?"&qs
  else
  GetUrl ="http://www."& Servername & ScriptAddress
  end if
End Function
%>

本人没有试过,有哪位试过的站长可以说说,效果怎么样,这个方法能不能用?
西安导购网(http://www.029dogoo.com)西安一流的导购平台!

回复 1# feieer 的帖子


感谢分享,可惜看不懂asp语言代码....
09年希望找到好工作、加入好团队、大家加油一起『牛』一把.
帮顶下。
学习啊
学习了  支持下  呵呵
支持,顶一下
张家界第一旅游网www.zjj3318.com
不是有域名转发么?直接设置"xxx.com"转向"www.xxx.com"不就行了么?怎么搞得这么麻烦,,当然如果是涉及到要转发某个页面的地址就要用到相关的程序代码了,就如楼主贴的类似。先得到"HTTP_HOST"主机名,要没有WWW就记下"SCRIPT_NAME"跟"QUERY_STRING"再转向。
发新话题