|
是不是后台填写https://域名,保存后就变成了http://域名:443,首先解决能够保存https的域名就行了。以下是我已经成功的分享一下。可以参考网站https://www.cnzqzd.com,网址路径及图片路径都是https的。
KS_Cls/Kesion.CommonCls.asp,约724行
- Public Function GetAutoDomain()Dim TempPathGetAutoDomain = Request.ServerVariables("SERVER_NAME")If Instr(UCASE(GetAutoDomain),"/W3SVC")<>0 Then GetAutoDomain=Left(GetAutoDomain,Instr(GetAutoDomain,"/W3SVC"))End IfIf Request.ServerVariables("SERVER_PORT") = "80" ThenGetAutoDomain = "http://" & GetAutoDomainelseif Request.ServerVariables("SERVER_PORT") = "443" ThenGetAutoDomain = "https://" & GetAutoDomainelseGetAutoDomain = "http://" & GetAutoDomain & ":" & Request.ServerVariables("SERVER_PORT")end ifEnd Function
G M T 文本转语音功能仅限200个字符
|