Subversion Repositories DevTools

Rev

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

Rev 1281 Rev 1337
Line 57... Line 57...
57 
End Sub
 57 
End Sub
58 
%>
 58 
%>
59 
<%
 59 
<%
60 
'--- Process submition ---
 60 
'--- Process submition ---
61 
If (QStrPar("action") <> "") Then
 61 
If (QStrPar("action") <> "") Then
62 
   ' All mendatory parameters FOUND
 62 
   ' All mandatory parameters FOUND
63 
   Call Remove_View_Settings ( objAccessControl.UserId )
 63 
   Call Remove_View_Settings ( objAccessControl.UserId )
64 
   Call Insert_View_Settings ( objAccessControl.UserId, Request("FRpersonalshow") )
 64 
   Call Insert_View_Settings ( objAccessControl.UserId, Request("FRpersonalshow") )
65 
End If
 65 
End If
66 
%>
 66 
%>
67 
<html>
 67 
<html>