Subversion Repositories DevTools

Rev

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

Rev 5590 Rev 5957
Line 36... Line 36...
36
 
36
 
37
 
37
 
38
<%
38
<%
39
' Page Access Condition
39
' Page Access Condition
40
If NOT canActionControl("ConfigureBuildService") Then
40
If NOT canActionControl("ConfigureBuildService") Then
-
 
41
    Call Destroy_All_Objects
41
    Response.Redirect("message.asp?msg=401-9")
42
    Response.Redirect("message.asp?msg=401-9")
42
End If
43
End If
43
%>
44
%>
44
<html>
45
<html>
45
<head>
46
<head>
Line 115... Line 116...
115
    <%=objPMod.ComposeHiddenTags()%>
116
    <%=objPMod.ComposeHiddenTags()%>
116
    <input type="hidden" name="action" value="true">
117
    <input type="hidden" name="action" value="true">
117
    <%Call objFormComponent.FormEnd()%>
118
    <%Call objFormComponent.FormEnd()%>
118
    </table>
119
    </table>
119
    </div>
120
    </div>
120
</body>
-
 
121
</html>
-
 
122
<!-- FOOTER -->
121
<!-- FOOTER -->
123
<!--#include file="_footer.asp"-->
122
<!--#include file="_footer.asp"-->
124
<%
123
</body>
125
Call Destroy_All_Objects
-
 
126
%>
124
</html>