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

由于网站已经改版为了不影响以前百度对文章的收录，所在文章导入动易的数据库时刻意让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

%>