%@ Language=VBScript %> <% Response.Expires=-1 If Session("ValidUser") <> 1 then Response.Redirect "login.asp" Else Session("LastPage") = Session("CurrentPage") Session("CurrentPage") = "WagerSubMenuB.asp" End if Dim sWagerType 'On Error goto ErrorHandler sWagerType = UCase(Trim(Request.QueryString("WagerType"))) %>