% if (not IsEmpty(Eval("objAccessControl"))) Then
If (objAccessControl.UserLogedIn) Then %>
<%End If%>
<%End If%>
<%' Highlight Development Systems
If ( NOT IsEmpty(Application("TestBannerStyle"))) Then
Dim DevStyle, DevExtraText, DevTitle
DevStyle = Application("TestBannerStyle")
DevTitle = Application("TestBanner")
DevExtraText = ""
If ( NOT IsEmpty(Application("LiveSystem"))) Then
DevExtraText = " Live Database"
End If
%>
<%=DevTitle%>:<%=request.servervariables("server_name")%> Database:<%=OraDatabase.DatabaseName%><%=DevExtraText%>
<%End If%>
 |
<%=ProgressBar()%> |
|
 |
<%If objAccessControl.UserLogedIn Then%>
 |
<%End If%>
<%
'------------ RUN AFTER CONTROL RENDER --------
'----------------------------------------------
%>