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

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

再次登陆后台，完美解决！