判断代码：

<%
if 1=1 then
    Server_HTTPS=lcase(request.ServerVariables("HTTPS"))
    if Server_HTTPS="off" then
        strMySeverURL= request.ServerVariables("URL")
        if lcase(strMySeverURL)= "/index.asp" then strMySeverURL=""

        Response.Redirect "https://" & request.ServerVariables("SERVER_NAME") & strMySeverURL
        Response.end
    end if
end if
%>

其中if 1=1 then如果变成if 1=2 then就不执行，是个开关。