ZBLOG设置技巧:ZBLOG实现301重定向方法
http://www.itjxue.com 2015-07-19 16:25 来源:未知 点击次数:
今天一直弄博客首页301重定向功能，研究一上午，找了很多的代码也没实现，后来通过一个代码更改了一下就成功了，自己开心一下。
下面把zblog重定向的方法分享给大家，因为zblo个的首页是default.asp，所以事先到空间上将default.asp下载到本地，用记事本打开或者用Dreamweaver打开也可以，找到这段代码：
<% Option Explicit %>
<% On Error Resume Next %>
<% Response.Charset="UTF-8" %>
<% Response.Buffer=True %>
<!-- #include file="c_option.asp" -->
<!-- #include file="function/c_function.asp" -->
<!-- #include file="function/c_function_md5.asp" -->
<!-- #include file="function/c_system_lib.asp" -->
<!-- #include file="function/c_system_base.asp" -->
<!-- #include file="function/c_system_event.asp" -->
<!-- #include file="function/c_system_plugin.asp" -->
<!-- #include file="plugin/p_config.asp" -->
<%
-----------------------------------------------------------------------------------------------------------
if request.ServerVariables("SERVER_NAME")="itjxue.com" then
Response.Status="301 Moved Permanently"
Response.AddHeader "Location", http://www.itjxue.com/
Response.End
end if
-----------------------------------------------------------------------------------------------------------
If (InStr(LCase(Request.ServerVariables("HTTP_ACCEPT")),"text/vnd.wap.wml") > 0) And (InStr(LCase(Request.ServerVariables("HTTP_ACCEPT")),"text/html") = 0) Then Response.Redirect "wap.asp"
将我分割符中间的代码：
if request.ServerVariables("SERVER_NAME")="itjxue.com" then
Response.Status="301 Moved Permanently"
Response.AddHeader "Location", http://www.itjxue.com/
Response.End
end if
加到
<%
和
If (InStr(LCase(Request.ServerVariables("HTTP_ACCEPT")),"text/vnd.wap.wml") > 0) And (InStr(LCase(Request.ServerVariables("HTTP_ACCEPT")),"text/html") = 0) Then Response.Redirect "wap.asp"
的中间就可以了，顺便说一下，把我的网址http;//www.itjxue.com/换成你的网址就可以了。