How do I make sure a page is being accessed only through SSL (https)?

[lucas]

I have a mix of secure and unsecure pages and want to make sure a particular login form is only accessed securely. I imagine there is probably a way for the server to force a directory to be secured but I would like to find a code solution to speed up development.

[vgarcia]

Dim secureCheck
secureCheck = Request.ServerVariables("SERVER_PORT_SECURE")
If secureCheck = 1 Then
  'secure stuff here
Else
  'page isn't secure!
End If

[lucas]

you are awesome.

[jsilver]

How do I add this? I've tried and it doesn't work.

Dim secureCheck
secureCheck = Request.ServerVariables("SERVER_PORT_SECURE")
If secureCheck = 1 Then
  'secure stuff here
Else
  'page isn't secure!
End If

[Thing]

Let's see your code.