请选择 进入手机版 | 继续访问电脑版
设为首页收藏本站

房子SEO优化论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 4|回复: 0

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

[复制链接]

1642

主题

1806

帖子

2120

积分

内容发布

Rank: 8Rank: 8

积分
2120
发表于 2018-9-2 10:20:55 | 显示全部楼层 |阅读模式
石家庄域名空间
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


您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐阅读精华帖子上一条 /1 下一条

QQ|手机版|小黑屋|房子SEO优化论坛 ( 冀ICP备13022201号 )  

GMT+8, 2018-9-19 05:43 , Processed in 0.953158 second(s), 32 queries , Gzip On.

Powered by Discuz! X3.2

© 2001-2013 ASPCMS启用二级域名跳转首页问题的解决方案-网站建设问题-房子SEO优化论坛

快速回复 返回顶部 返回列表