<%@LANGUAGE="VBSCRIPT"%>
<%
Option explicit
Response.Expires = 0 ' always load the page, dont store
%>
<%
'=====================================================
' New Project
'=====================================================
%>
<%
'------------ ACCESS CONTROL ------------------
%>
<%
'------------ Variable Definition -------------
Dim parProj
'------------ Constants Declaration -----------
'------------ Variable Init -------------------
parProj = QStrPar("FRproj")
'----------------------------------------------
%>
<%
'Process submition
If CBool(QStrPar("action")) AND (parProj <> "") AND objAccessControl.UserLogedIn Then
%>
<%
Call CloseWindow
End If
%>
Release Manager