Subversion Repositories DevTools

Rev

Rev 5506 | Rev 5984 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5506 Rev 5957
Line 75... Line 75...
75
<%
75
<%
76
'Process submition
76
'Process submition
77
If CBool(QStrPar("action")) Then
77
If CBool(QStrPar("action")) Then
78
   Call Update_Owner ( parPv_list, Request("own_id") )
78
   Call Update_Owner ( parPv_list, Request("own_id") )
79
 
79
 
-
 
80
   Call Destroy_All_Objects
80
   Response.Redirect ( "members_notifications.asp" )
81
   Response.Redirect ( "members_notifications.asp" )
81
 
82
 
82
Else
83
Else
83
   '------------ Action Requirements -------------------
84
   '------------ Action Requirements -------------------
84
   If NOT objAccessControl.UserLogedIn Then
85
   If NOT objAccessControl.UserLogedIn Then
85
      ' NOT AUTHENTICATED
86
      ' NOT AUTHENTICATED
-
 
87
      Call Destroy_All_Objects
86
      Response.Redirect("login.asp?rfile=members_notifications.asp")
88
      Response.Redirect("login.asp?rfile=members_notifications.asp")
87
   ElseIf parPv_list = -1 Then
89
   ElseIf parPv_list = -1 Then
88
      ' missing pkg_list
90
      ' missing pkg_list
-
 
91
      Call Destroy_All_Objects
89
      Response.Redirect ( "members_notifications.asp" )
92
      Response.Redirect ( "members_notifications.asp" )
90
 
93
 
91
   End If
94
   End If
92
 
95
 
93
End If
96
End If
Line 204... Line 207...
204
</table>
207
</table>
205
<!-- FOOTER -->
208
<!-- FOOTER -->
206
<!--#include file="_footer.asp"-->
209
<!--#include file="_footer.asp"-->
207
</body>
210
</body>
208
</html>
211
</html>
209
<%
-
 
210
Call Destroy_All_Objects
-
 
211
%>
-