<%@LANGUAGE="VBSCRIPT"%> <% '===================================================== '| | '| wNodeSpec | '| | '===================================================== %> <% Option explicit Response.Expires = 0 %> <% '------------ ACCESS CONTROL ------------------ %> <% '------------ VARIABLE DEFINITION ------------- Dim objTabControl Dim objTemplateManager Dim rsQry Dim OsTab '------------ CONSTANTS DECLARATION ----------- '------------ VARIABLE INIT ------------------- Call GetMainDBParameters ( dbPARproj_id, dbPARbranch_id, dbPARbom_id, dbPARnode_id, dbPARos_id, dbPARprod_id ) parNode_id = dbPARnode_id parOs_id = dbPARos_id '------------ CONDITIONS ---------------------- '---------------------------------------------- '------------ RUN BEFORE PAGE RENDER ---------- '---------------------------------------------- %> Deployment Manager
 Node Spec Export
Click on the text to select.
<% '[1] Tab Name '[2] Tab Link '[3] JavaScript Event e.g. "onClick='...'" '[4] Tab Image Selected '[5] Tab Image Diselected '[6] Tab Image Disabled '[7] Tab Hint '[8] Force Disable. Values: Y, N(default) OraDatabase.Parameters.Add "NODE_ID", parNode_id, ORAPARM_INPUT, ORATYPE_NUMBER Set rsQry = OraDatabase.DbCreateDynaset( GetQuery ("OsList.sql"), ORADYN_DEFAULT ) OraDatabase.Parameters.Remove "NODE_ID" Set objTabControl = New TabControl objTabControl.TemplateDoc = ReadFile( Server.MapPath("controls/ERGTabStyleWinXP/tab_style.html") ) ' Supply tab style definition objTabControl.TabStyle = "StyleWinXP" If Request("ostab") <> "" Then OsTab = CDbl( Request("ostab") ) Else OsTab = 0 End If While (NOT rsQry.BOF) AND (NOT rsQry.EOF) objTabControl.Add ( Array( rsQry("os_name"), SCRIPT_NAME &"?ostab="& rsQry("os_id") &"&"& objPMod.ComposeURL() , "", "", "", "", "", "" ) ) If OsTab = 0 Then OsTab = CDbl( rsQry("os_id")) objTabControl.SelectByName rsQry("os_name") ElseIf OsTab = CDbl(rsQry("os_id")) Then OsTab = rsQry("os_id") objTabControl.SelectByName rsQry("os_name") End If rsQry.MoveNext() WEnd rsQry.Close() Set rsQry = nothing objTabControl.Render () %>