home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / ins.cab / _cnst.asp next >
Text File  |  1997-10-19  |  240b  |  13 lines

  1. <% REM if user is anonymous, force logon %>
  2. <% 
  3.  
  4.  
  5. if (Len(Request.ServerVariables("REMOTE_USER")) = 0) then 
  6.     Response.Status = "Error: Access is Denied." 
  7.     L_ACCESSDENIED_ERRORMESSAGE
  8.     cont = false
  9. else
  10.     cont = true
  11. end if 
  12.  
  13. %>