<%@ LANGUAGE=VBScript %> <% Response.Buffer = True %> <% 'validate User Type 'if Utype = General (0) UPGRADE to ==> FREE_COMPANY (1) 'and UPGRADE to FREE_PRODUCT (2) and UPGRADE to HAVE_PRODUCT (3) 'and UPGRADE to ADMIN (9) **TOP LEVEL IF Session("Common_Access") < 1 THEN 'msgbox "Invalid User Name OR Password",48,"Warning" Response.Clear 'error logon warning Response.Redirect "Default.asp" ELSEIF Session("Common_Access") = 1 THEN Response.Redirect "UComInfoAdd.asp" ELSE Response.Redirect "UComInfoEdit.asp" END IF %>