Redirect User To Correct Login Page

If a user runs a page on our site and has not yet logged in, we can redirect him to the correct login page with the following script:

 
<SCRIPT RUNAT=Server Language=VBScript> 

Sub Session_OnStart 
Dim varStartPage 
Dim varCurentPage 

'Check to see if current page is the correct login page 
varStartPage = "/LogIn/LogIn.asp" 

'Get the current page
varCurrentPage = Request.ServerVariables("SCRIPT_NAME") 

'If page is not correct then send the visitor to the correct login page 
If StrComp(varCurrentPage, varStartPage, 1) Then
Response.Redirect( StartPage)
End If 

End Sub 

</SCRIPT>