aspcms系统加密后https后台无法登录解决办法

aspcms系统加密后https后台无法登录解决办法

aspcms系统安装SSL证书加密后https后台无法登录，提示非法外部提交被禁止
解决办法
在 /inc/CommonFun.asp替换

Function isOutSubmit()
dim server1, server2,num
server1=getRefer
server2=getServername
if Left(server1,5)="https" then
num=9
else
num=8
end if
if Mid(server1, num, len(server2)) <> server2 then
isOutSubmit=true
else
isOutSubmit=false
end if
End Function