ASPCMS启用二级域名跳转首页问题的解决方案

问题发布与回答

aspcms启用二级域名后在手机百度等移动端里所有链接打开全部跳转首页问题的解决方案

找到inc文件里的AspCms_SettingClass.asp文件，在文件里找到如下提示和代码。

将以下代码删除或注释掉，一共9行。

dim domain:domain=Request.ServerVariables("SERVER_NAME")

dim pagemode: pagemode=""

If (domain=wapDomain) and switchWapStatus Then

pagemode="wap"

elseif wapDomain<>"" and checkWap() and switchWapStatus Then

Response.Redirect("http://"&wapDomain)

elseif switchWapStatus then

checkMode()

end if

用下面的代码替换掉上面的被删除或注释掉的代码即可。

dim domain:domain=Request.ServerVariables("SERVER_NAME")

dim UA_host, UA_path, UA_query

UA_host = "http://"&request.ServerVariables("HTTP_HOST")

UA_path = replaceStr(request.ServerVariables("PATH_INFO"),"/index.asp","")

UA_query = request.ServerVariables("QUERY_STRING")

dim pagemode: pagemode=""

If (domain=wapDomain) and switchWapStatus Then

pagemode="wap"

elseif wapDomain<>"" and checkWap() and switchWapStatus Then

Response.Redirect("http://"&wapDomain&UA_path&"/?"&UA_query)

elseif switchWapStatus then

checkMode()

end if