换域名了,写了个带目录跳转的301重定向,欢迎参考
抢了个www.im286.co,舍不得用,决定直接投资了,于是在茫茫网海中寻寻觅觅得到一个极品米,www.xiaofeizhe.org,之因此说该米是极品米,有三个理由:
1,该米已经beian了
2,该米百度已经收录了
3,该米是我的
闲话不表,请看代码,很简单的
把www.im286.co网站的内容转到www.xiaofeizhe.org,域名上,一般的301都是直接的域名重定向(www.im286.co到www.xiaofeizhe.org)
,这里给出新的例子,实现目录重定向<%
Dim sErrorUrl
sErrorUrl = Split(Request.ServerVariables("Query_String"), ";")(1)'取得出错的URL
sErrorUrl = Mid(sErrorUrl, InStr(8, sErrorUrl, "/"))'取得出错文件路径(去除http://域名)
Response.Status="301 Moved Permanently"
Response.AddHeader "Location","http://www.xiaofeizhe.org"& sErrorUrl
Response.End
%>例如:输入http://www.im286.co/tousu/qita/865.html
就会通过301重定向到http://www.xiaofeizhe.org/tousu/qita/865.html
页:
[1]