]KesionCMS全站使用https的方法-玄门社区-风水自学网

608 查看	1 回复

主题：]KesionCMS全站使用https的方法 [收藏主题]

我我当前离线

32 主题	5 广播	2 粉丝

级别:v1

用户积分:113 分
登录次数:83 次
注册时间:2023-8-14
最后登录:2024-4-19

我我发表于：2023-12-1 1:17:58 | 显示全部帖子查看该作者主题楼主

现在https越来越流行，更多的网站开始全站使用ssl加密传输，但kesioncms似乎在这一点上没有做过多的考虑；本人在架设网站时就发现完全没法使用cms，比如我的网站，因为系统获取的url是无论你怎么更改成都没有用，而我网站的初衷又不想开启网站http://访问，所有的访问都需要经过https，那么，这就需要改代码了。

以下基于KesionCMS X2/X1更改：

找到文件：KS_Cls/Kesion.CommonCls.asp，约724行

Public Function GetAutoDomain()

Dim TempPath

If Request.ServerVariables("SERVER_PORT") = "80" Then

GetAutoDomain = Request.ServerVariables("SERVER_NAME")

Else

GetAutoDomain = Request.ServerVariables("SERVER_NAME") & ":" & Request.ServerVariables("SERVER_PORT")

End If

If Instr(UCASE(GetAutoDomain),"/W3SVC")<>0 Then

GetAutoDomain=Left(GetAutoDomain,Instr(GetAutoDomain,"/W3SVC"))

End If