Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5957
Line 70... Line 70...
70
        " ORDER BY pkg_name ASC"
70
        " ORDER BY pkg_name ASC"
71
    End If
71
    End If
72
End Function
72
End Function
73
'-------------Page Access Condition--------------------------------------------
73
'-------------Page Access Condition--------------------------------------------
74
If NOT objAccessControl.UserLogedIn Then
74
If NOT objAccessControl.UserLogedIn Then
-
 
75
    Call Destroy_All_Objects
75
	Response.Redirect("message.asp?msg=401-9")
76
	Response.Redirect("message.asp?msg=401-9")
76
End If
77
End If
77
If canActionControlInProject("EditPackageProperties") Then
78
If canActionControlInProject("EditPackageProperties") Then
78
    canEdit = true
79
    canEdit = true
79
Else
80
Else
Line 242... Line 243...
242
		  <input type="hidden" name="pkgId" value="<%=parPkgId%>">
243
		  <input type="hidden" name="pkgId" value="<%=parPkgId%>">
243
		  </form>
244
		  </form>
244
		  <%Call objFormComponent.FormEnd()%>
245
		  <%Call objFormComponent.FormEnd()%>
245
    </table>
246
    </table>
246
  </div>
247
  </div>
247
</body>
-
 
248
</html>
-
 
249
<!-- FOOTER -->
248
<!-- FOOTER -->
250
<!--#include file="_footer.asp"-->
249
<!--#include file="_footer.asp"-->
251
<%
-
 
252
Call Destroy_All_Objects
-
 
253
%>
-
 
254
250
</body>
-
 
251
</html>
-
 
252