Subversion Repositories DevTools

Rev

Rev 7288 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7288 Rev 7292
Line 115... Line 115...
115 
<body>
 115 
<body>
116 
<!-- HEADER -->
 116 
<!-- HEADER -->
117 
<!--#include file="_header.asp"-->
 117 
<!--#include file="_header.asp"-->
118 
<!-- Body of the page -->
 118 
<!-- Body of the page -->
119 
<div class="bg_grey">
 119 
<div class="bg_grey">
120 
<div id='divProgressBar' class='vixSpinner' style='visibility:hidden;'></div>
 - 
 
121 
<table style='margin-left: auto;margin-right: auto;'>
 120 
<table style='margin-left: auto;margin-right: auto;'>
122 
   <%
 121 
   <%
123 
   '-- FROM START ---------------------------------------------------------------------------------------------------------
 122 
   '-- FROM START ---------------------------------------------------------------------------------------------------------
124 
   Dim bReadOnly: bReadOnly = NOT canActionControl("ConfigureBuildService")
 123 
   Dim bReadOnly: bReadOnly = NOT canActionControl("ConfigureBuildService")
125 
   objFormComponent.FormName = "UpdateBuildServiceConfig"
 124 
   objFormComponent.FormName = "UpdateBuildServiceConfig"
126 
   objFormComponent.Action = ScriptName
 125 
   objFormComponent.Action = ScriptName
127 
   objFormComponent.OnSubmit = "ShowProgress();"
 126 
   objFormComponent.OnSubmit = "showGlobalProgress();"
128 
   ' Page Access Condition
 127 
   ' Page Access Condition
129 
   If bReadOnly Then
 128 
   If bReadOnly Then
130 
     objFormComponent.IsReadonlyAction = enumDB_YES
 129 
     objFormComponent.IsReadonlyAction = enumDB_YES
131 
   End If
 130 
   End If
132 
 
 131