补充:二级页面的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
%>
本人没有试过,有哪位试过的站长可以说说,效果怎么样,这个方法能不能用?