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 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 124... Line 125...
124
    <%=objPMod.ComposeHiddenTags()%>
125
    <%=objPMod.ComposeHiddenTags()%>
125
    <input type="hidden" name="action" value="true">
126
    <input type="hidden" name="action" value="true">
126
    <%Call objFormComponent.FormEnd()%>
127
    <%Call objFormComponent.FormEnd()%>
127
    </table>
128
    </table>
128
    </div>
129
    </div>
129
</body>
-
 
130
</html>
-
 
131
<!-- FOOTER -->
130
<!-- FOOTER -->
132
<!--#include file="_footer.asp"-->
131
<!--#include file="_footer.asp"-->
133
<%
-
 
134
Call Destroy_All_Objects
-
 
135
%>
-
 
136
132
</body>
-
 
133
</html>
-
 
134