Subversion Repositories DevTools

Rev

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

Rev 5506 Rev 5590
Line 26... Line 26...
26 
			QStrPar = Request.Cookies(COOKIE_RELEASEMANAGER_MEMORY)(SSpar)
 26 
			QStrPar = Request.Cookies(COOKIE_RELEASEMANAGER_MEMORY)(SSpar)
27 
		End If
 27 
		End If
28 
	End If
 28 
	End If
29 
End Function
 29 
End Function
30 
 
 30 
 
- 
 
 31 
Function QStrParDefault ( SSpar, DefVal )
- 
 
 32 
	If NOT IsEmpty(Request( SSpar )) Then
- 
 
 33 
		QStrParDefault = Request(SSpar)(1)
- 
 
 34 
	ElseIf NOT IsEmpty(Request.Cookies(COOKIE_RELEASEMANAGER_MEMORY)(SSpar)) Then
- 
 
 35 
		QStrParDefault = Request.Cookies(COOKIE_RELEASEMANAGER_MEMORY)(SSpar)
- 
 
 36 
    Else
- 
 
 37 
        QStrParDefault = DefVal
- 
 
 38 
	End If
- 
 
 39 
End Function
- 
 
 40 
 
- 
 
 41 
 
31 
Function QSTR_All
 42 
Function QSTR_All
32 
	'QSTR_All = "&" & Request.ServerVariables("QUERY_STRING")
43 
	'QSTR_All = "&" & Request.ServerVariables("QUERY_STRING")
33 
	QSTR_All = "&pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id")
44 
	QSTR_All = "&pv_id="& Request("pv_id") &"&rtag_id="& Request("rtag_id")
34 
End Function
 45 
End Function
35 
 
 46