Subversion Repositories DevTools

Rev

Rev 129 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 129 Rev 1376
Line 60... Line 60...
60 
End Function
 60 
End Function
61 
%>
 61 
%>
62 
<%
 62 
<%
63 
'--- Process submition ---
 63 
'--- Process submition ---
64 
If (QStrPar("action") <> "") Then
 64 
If (QStrPar("action") <> "") Then
65 
   ' All mendatory parameters FOUND
 65 
   ' All mandatory parameters FOUND
66 
   Call Remove_View_Settings ( objAccessControl.UserId )
 66 
   Call Remove_View_Settings ( objAccessControl.UserId )
67 
   Call Insert_View_Settings ( objAccessControl.UserId, Request("FRpublicshow") )
 67 
   Call Insert_View_Settings ( objAccessControl.UserId, Request("FRpublicshow") )
68 
End If
 68 
End If
69 
%>
 69 
%>
70 
<html>
 70 
<html>