ASP实现子目录301重定向

说明：更换域名时，为了不影响网站的收录，我们经常会对旧域名进行301重定向，一般的301重定向都是直接域名重定向（到），今天介绍一种利用ASP代码实现子目录301重定向的方法，如：输入，就会通过301重定向到。

　　代码：

<%
Dim sErrorUrl
sErrorUrl=Split(Request.ServerVariables("Query_String"),";")(1)'取得出错的URL
sErrorUrl=Mid(sErrorUrl,InStr(8,sErrorUrl,"/"))'取得出错文件路径(去除域名)
Response.Status="301 Moved Permanently"
Response.AddHeader "Location",""&sErrorUrl
Response.End
%>