HTTP to HTTPS redirect resulting in a loop

[jdwfly]

Just before I go an tell my sys admin that the server has problems I wanted to run this by everyone on here. Basically we have a few pages that need to be sent over https. Everything I have found on the internet resulted in this code

If (Request.ServerVariables("HTTPS") = "off") Then
        srvname = Request.ServerVariables("SERVER_NAME")
        scrname = Request.ServerVariables("SCRIPT_NAME")
        Response.Redirect("https://" & srvname & scrname)
    End If

I will say that this code has worked for me over a month and then all of the sudden it stops working and always gives a redirect loop error. I have already checked that the ServerVariables is "off" during an http request and it is "on" during an https request.

Honestly, this code should work and it has been working until recently. Unfortunately my sysadmin believes it is faulty code and told me to rewrite it, claiming that his server could "have no faults."

Anyone have an idea or should this code work? btw it is being run on IIS 6

[Nicodemas]

Just a thought, but are you sure you are correctly comparing strings? I use this, which returns a numeric value so I don't have to worry about uppercase and lowercase comparison differences:

i = Request.ServerVariables("SERVER_PORT_SECURE")
'// returns 1 or 0
 

You could still use yours, but ensure the case of the result is what you expect:

If (lcase(Request.ServerVariables("HTTPS")) = "off") Then 
   srvname = Request.ServerVariables("SERVER_NAME") 
   scrname = Request.ServerVariables("SCRIPT_NAME") 
   Response.Redirect("https://" & srvname & scrname)
End If