aspcms系统安装SSL证书后，https后台无法登录，提示非法外部提交被禁止，解决办法如下：

打开inc文件夹CommonFun.asp代码，找到如下代码：

Function isOutSubmit()

dim server1, server2
server1=getRefer
server2=getServername
if Mid(server1, 8, len(server2)) <> server2 then
isOutSubmit=true
else
isOutSubmit=false
end if
End Function

将代码替换成：

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