Subversion Repositories DevTools

Rev

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

Rev 66 Rev 70
Line 22... Line 22...
22 
 
 22 
 
23 
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
 23 
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
24 
Set OraDatabase = OraSession.OpenDatabase( Application("TNS_NAME"), Application("DEPLOYMENT_MANAGER_LOGIN"), Cint(0))
 24 
Set OraDatabase = OraSession.OpenDatabase( Application("TNS_NAME"), Application("DEPLOYMENT_MANAGER_LOGIN"), Cint(0))
25 
 
 25 
 
26 
'-- ClearQuest Connection
 26 
'-- ClearQuest Connection
27 
Const CQ_CONN = "Provider=sqloledb;Data Source=auperatcm04;Initial Catalog=master;User Id=release_manager;Password=release_manager"
 27 
Const CQ_CONN = "Provider=sqloledb;Data Source=auperaprj02;Initial Catalog=master;User Id=release_manager;Password=release_manager"
28 
' -----------------------------------------------------
 28 
' -----------------------------------------------------
29 
%>
 29 
%>
30 
<%
 30 
<%
31 
' -- CONFIGURATIONS -----------------------------------
 31 
' -- CONFIGURATIONS -----------------------------------
32 
Const DOC_FOLDER = "doc"
 32 
Const DOC_FOLDER = "doc"