Subversion Repositories DevTools

Rev

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

Rev 5071 Rev 5072
Line 195... Line 195...
195 
  Else
 195 
  Else
196 
     controlDisabledInProject = " disabled "
 196 
     controlDisabledInProject = " disabled "
197 
  End If
 197 
  End If
198 
End Function
 198 
End Function
199 
 
 199 
 
- 
 
 200 
'-------------------------------------------------
- 
 
 201 
' Function:     setActiveProject
- 
 
 202 
' Description:  Alters the current active project
- 
 
 203 
'               Normally this is automatically determined as a page is loaded, but some
- 
 
 204 
'               pages do not have this information.
- 
 
 205 
'               Returns the active project ID, before the change
- 
 
 206 
 
- 
 
 207 
Function setActiveProject(proj_id)
- 
 
 208 
 
- 
 
 209 
    setActiveProject = DB_PROJ_ID
- 
 
 210 
    DB_PROJ_ID = proj_id
- 
 
 211 
    bCanModifyProject = objAccessControl.IsDataActive ("PROJECTS", DB_PROJ_ID, "EditProjects")
- 
 
 212 
 
- 
 
 213 
End Function
- 
 
 214 
 
200 
%>
 215 
%>
201 
<%
 216 
<%
202 
'------------ RUN BEFORE CONTROL RENDER -------
 217 
'------------ RUN BEFORE CONTROL RENDER -------
203 
 
 218 
 
204 
 
 219