home *** CD-ROM | disk | FTP | other *** search
/ bombers.k12.ar.us / bombers.k12.ar.us.tar / bombers.k12.ar.us / survey_unconfigured / InsertReportFilter.asp < prev    next >
Text File  |  2006-10-25  |  2KB  |  35 lines
  1. <!--#Include File="Include/Top_inc.asp"-->
  2. <%
  3. '***********************************************************************
  4. '   Application: SelectSurveyASP Advanced v8.1.11
  5. '   Author: Aaron Baril for ClassApps.com
  6. '   Page Description: This page inserts a new report filter by calling the 
  7. '                      InsertReportFilter function.  
  8. '
  9. '   COPYRIGHT NOTICE                                
  10. '
  11. '   See attached Software License Agreement
  12. '
  13. '   (c) Copyright 2002 - 2006 by ClassApps.com.  All rights reserved.
  14. '***********************************************************************
  15. %>
  16. <!--#Include File="Include/Config_inc.asp"-->
  17. <!--#Include File="Include/Utility_inc.asp"-->
  18. <!--#Include File="Include/adovbs_inc.asp"-->
  19. <!--#Include File="Include/CurrentUser_inc.asp"-->
  20. <!--#Include File="Include/SurveySecurity_inc.asp"-->
  21. <!--#Include File="Include/SurveyReportFilter_inc.asp"-->
  22. <!--#Include File="Include/ID_inc.asp"-->
  23. <!--#Include File="Include/Constants_inc.asp"-->
  24. <%
  25.     'If the user has access to the overview report, they also have access to the report filters
  26.     If CanUserViewOverviewReport(Request.Form("SurveyID")) = False Then
  27.         Response.Redirect "AccessDenied.asp?SurveyID=" & Request.Form("SurveyID") & "&Reason=" & SUR_ACCESS_DENIED_NOT_PERMISSION_TO_PAGE_FILTERS
  28.     End If
  29.  
  30.     'Insert the new report filter
  31.     InsertReportFilter Request.Form("SurveyID")
  32.  
  33.     'Redirect to the modify survey page for the survey.
  34.     Response.Redirect "ReportFilterList.asp?SurveyID=" & Request.Form("SurveyID") & "&SurveyName=" & Request.Form("SurveyName") & "&DisplayHeader=" & Request.Form("DisplayHeader")
  35. %>