<%@ LANGUAGE="VBScript" %> <% Option Explicit 'Buffer the response, so Response.Expires can be used Response.Buffer = TRUE %> <% Call SetAppVariables Dim cnnDB, sid Set cnnDB = CreateCon sid = GetSid %> <% ' See if user is authenticated Call CheckUser(cnnDB, sid) ' This page will just redirect users to their menu. ' If they aren't logged in, CheckUser will redirect to logon.asp If Usr(cnnDB, sid, "IsRep") = 1 Then cnnDB.Close Response.Redirect "rep/" Else cnnDB.Close Response.Redirect "user/" End If cnnDB.Close %>