您的位置:首页 > 运维架构 > 网站架构

对网站的seo有作用的301重定向

2009-07-24 10:32 344 查看
由于网站已经改版为了不影响以前百度对文章的收录,所在文章导入动易的数据库时刻意让ID号是一样的为的是以后在做301跳转的时候不是那么的麻烦。
做了一个数据表comparison;一个字段用来存文章的ID一个用来存新文章的URL地址,这样的一张对照表就可以完成301的对照跳转了

<%@ Language="VBScript" %>
<%
dim conn
dim connstr
set conn=server.createobject("ADODB.CONNECTION")
connstr = "DBQ=" + server.mappath("db.asp") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
if err.number<>0 then
err.clear
set conn=nothing
response.write "数据库连接出错!"
Response.End
else
conn.open connstr
if err then
err.clear
set conn=nothing
response.write "数据库连接出错!"
Response.End
end if
end if

sub endConnection()
conn.close
set conn=nothing
end sub
%>
<%
dim rste, sqlqq
set rste=server.createobject("adodb.recordset")
sqlqq="select * from comparison where id="&request("id")
rste.open sqlqq ,connstr ,1,1
if rste.eof and rste.bof then
response.write "<script>alert('对不起,该文章并不存在,请返回!');window.close();</Script>"
response.end

else
response.write rste("url")
Response.Status = "301 Moved Permanently"
Response.AddHeader "Location", http://www.xxx.com+rste("url") '查询完成对照表后实现页面的重定向
end if
%>
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: