<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== ' Dependency Changes ' --- PROCESS FORM --- '===================================================== %> <% Option explicit ' Good idea to set when using redirect Response.Expires = 0 ' always load the page, dont store %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ Variable Definition ------------- Dim parPv_id Dim parRfile Dim rsPkgInfo Dim errMessage Dim rsTemp '------------ Constants Declaration ----------- '------------ Variable Init ------------------- parPv_id = Request("pv_id") parRfile = Request("rfile") '---------------------------------------------- Set pkgInfoHash = CreateObject("Scripting.Dictionary") '---------------------------------------------- %> <% '-------------------------------------------------------------------------------------------------------------------------------------- '-------------------------------------------------------------------------------------------------------------------------------------- %> <% If Request("pv_id") <> "" Then Call Get_Pkg_Info ( Request("pv_id"), Request("rtag_id") ) End If %> <% '----------------------- MAIN LINE --------------------------- '--- Process submition --- If CBool(QStrPar("action")) Then 'Call OpenInParentWindow ( parRfile &"?pv_id="& parPv_id &"&rtag_id="& parRtag_id ) Call CloseWindow End If If Request("btn") = "Hide" Then ' Store filter in cookie Response.Cookies(enum_RELMGR_COOKIE_DOMAIN)(COOKIE_HIDE_FILES_FILTER) = Request("filefilter") End If If Request("btn2") = "Hide" Then ' Store filter in cookie Response.Cookies(enum_RELMGR_COOKIE_DOMAIN)(COOKIE_HIDE_DEPS_FILTER) = Request("depfilter") End If '--------------------------------------------------------------- %> Release Manager <%bCsvExport = True%>
<%= pkgInfoHash.Item("pkg_name") &" "& pkgInfoHash.Item("pkg_version")%>