Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5957
Line 39... Line 39...
39
 
39
 
40
 
40
 
41
<%
41
<%
42
' Page Access Condition
42
' Page Access Condition
43
If NOT canActionControl("ConfigureBuildService") Then
43
If NOT canActionControl("ConfigureBuildService") Then
-
 
44
    Call Destroy_All_Objects
44
    Response.Redirect("message.asp?msg=401-9")
45
    Response.Redirect("message.asp?msg=401-9")
45
End If
46
End If
46
%>
47
%>
47
<html>
48
<html>
48
<head>
49
<head>
Line 126... Line 127...
126
    <%=objPMod.ComposeHiddenTags()%>
127
    <%=objPMod.ComposeHiddenTags()%>
127
    <input type="hidden" name="action" value="true">
128
    <input type="hidden" name="action" value="true">
128
    <%Call objFormComponent.FormEnd()%>
129
    <%Call objFormComponent.FormEnd()%>
129
    </table>
130
    </table>
130
    </div>
131
    </div>
131
</body>
-
 
132
</html>
-
 
133
<!-- FOOTER -->
132
<!-- FOOTER -->
134
<!--#include file="_footer.asp"-->
133
<!--#include file="_footer.asp"-->
135
<%
-
 
136
Call Destroy_All_Objects
-
 
137
%>
-
 
138
134
</body>
-
 
135
</html>
-
 
136