Subversion Repositories DevTools

Rev

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

Rev 5071 Rev 5080
Line 33... Line 33...
33 
parFRsdk_id = QStrPar("FRsdk_id")
 33 
parFRsdk_id = QStrPar("FRsdk_id")
34 
parFRsdktag_id = QStrPar("FRsdktag_id")
 34 
parFRsdktag_id = QStrPar("FRsdktag_id")
35 
If parFRsdk_id = "" Then parFRsdk_id = "-1"
 35 
If parFRsdk_id = "" Then parFRsdk_id = "-1"
36 
If parFRsdktag_id = "" Then parFRsdktag_id = "-1"
 36 
If parFRsdktag_id = "" Then parFRsdktag_id = "-1"
37 
bLoggedIn = objAccessControl.UserLogedIn
 37 
bLoggedIn = objAccessControl.UserLogedIn
38 
bAuthorised = canActionControlInProject("AddReleaseReference")
 38 
bAuthorised = canActionControlInProject("CreateSdk")
39 
'----------------------------------------------
 39 
'----------------------------------------------
40 
%>
 40 
%>
41 
<%
 41 
<%
42 
Sub Get_Projects ( NNsdk_id )
 42 
Sub Get_Projects ( NNsdk_id )
43 
	Dim rsTemp, Query_String, tempLINK, selStr
 43 
	Dim rsTemp, Query_String, tempLINK, selStr