Subversion Repositories DevTools

Rev

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

Rev 5590 Rev 5957
Line 45... Line 45...
45
'-----------------------------------------------------------------------------------------------------------------------
45
'-----------------------------------------------------------------------------------------------------------------------
46
%>
46
%>
47
<%
47
<%
48
'-------------Page Access Condition-------------------------------------------------------------------------------------
48
'-------------Page Access Condition-------------------------------------------------------------------------------------
49
If NOT canActionControl("ConfigureBuildService") Then
49
If NOT canActionControl("ConfigureBuildService") Then
-
 
50
    Call Destroy_All_Objects
50
	Response.Redirect("message.asp?msg=401-9")
51
	Response.Redirect("message.asp?msg=401-9")
51
End If
52
End If
52
%>
53
%>
53
 
54
 
54
 
55
 
Line 122... Line 123...
122
		  <%=objPMod.ComposeHiddenTags()%>
123
		  <%=objPMod.ComposeHiddenTags()%>
123
		  <input type="hidden" name="action" value="true">
124
		  <input type="hidden" name="action" value="true">
124
		  <%Call objFormComponent.FormEnd()%>
125
		  <%Call objFormComponent.FormEnd()%>
125
    </table>
126
    </table>
126
  </div>
127
  </div>
127
</body>
-
 
128
</html>
-
 
129
<!-- FOOTER -->
128
<!-- FOOTER -->
130
<!--#include file="_footer.asp"-->
129
<!--#include file="_footer.asp"-->
131
<%
-
 
132
Call Destroy_All_Objects
-
 
133
%>
-
 
134
130
</body>
-
 
131
</html>
-
 
132