Subversion Repositories DevTools

Rev

Rev 62 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
62 rsolanki 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|				          INDEX						 |
6
'|                                                   |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
Response.Expires = 0
12
%>
13
<!--#include file="common/globals.asp"-->
14
<!--#include file="common/config.asp"-->
15
<!--#include file="common/common_subs.asp"-->
16
<%
17
'------------ VARIABLE DEFINITION -------------
18
'------------ CONSTANTS DECLARATION -----------
19
'------------ VARIABLE INIT -------------------
20
objAccessControl.objOraSession = OraSession	' Create database link for orasession
21
objAccessControl.objOraDatabase = OraDatabase	' Create database link for oradatabase
22
'------------ CONDITIONS ----------------------
23
'----------------------------------------------
24
%>
25
<%
26
'----------------------------------------------------------------------------------------------------------------------------------------------
27
Sub Logon ()
28
	'On Error Resume Next
29
 
30
	objEH.Try()
31
 
32
	Call objAccessControl.LogonUser ( Request("user_name"), Session(enumUSER_TEMP_VARIABLE) )
33
 
34
	objEH.Catch()
35
 
36
End Sub
37
'----------------------------------------------------------------------------------------------------------------------------------------------
38
Sub UpdatePassword ()
39
 
40
	On Error Resume Next
41
 
42
	objEH.Try()
43
 
44
	Call objAccessControl.SetPassword ( Request("user_name"), Session(enumUSER_TEMP_VARIABLE), Request("cpassword") )
45
 
46
	objEH.Catch()
47
 
48
End Sub
49
'----------------------------------------------------------------------------------------------------------------------------------------------
50
%>
51
<%
52
'------------ RUN BEFORE PAGE RENDER ----------
53
objPMod.PersistInQryString ( aPersistList )
54
 
55
' --- RUN onPostBack ---
56
If CBool(Request("action")) Then
57
	Call UpdatePassword ()
58
 
59
	Call Logon ()
60
 
61
	If objEH.Finally Then
62
		' Clean Temp Session Variable
63
		Session.Contents.Remove(enumUSER_TEMP_VARIABLE)
64
 
65
		If Request("rfile") <> "" Then
66
			Call OpenInWindow ( Request("rfile") &"?LOGIN=ok"& objPMod.ComposeURLWithout("rfile") )
67
		Else
68
			Call OpenInWindow ( "index.asp" )
69
		End If
70
 
71
	End If
72
End If
73
 
74
'----------------------------------------------
75
%>
76
<html>
77
<head>
78
<title>Deployment Manager</title>
79
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
80
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
81
<link href="scripts/deployment_manager.css" rel="stylesheet" type="text/css">
82
<script language="JavaScript" src="scripts/common.js"></script>
83
 
84
</head>
85
<body background="images/bg_lite_blue.gif" leftmargin="0" topmargin="0" onLoad="FormName.cpassword.focus();">
86
<!-- HEADER ++++++++++++++++ -->
87
<!--#include file="_header.asp"-->
88
<!-- +++++++++++++++++++++++ -->
89
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
90
<form name="FormName" method="post" action="<%=SCRIPT_NAME%>" >
91
  <tr>
92
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="42"></td>
93
  </tr>
94
  <tr>
95
    <td align="center" valign="middle" bgcolor="#FFFFFF">
96
	<!-- LOGIN FROM ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
97
    <table width="570" border="0" cellspacing="0" cellpadding="0">
98
      <tr>
99
        <td align="right"><a href="<%=ACCESS_MANAGER_URL%>" title="Access Manager Home"><img src="icons/img_auth_by_access_manager.gif" width="103" height="26" hspace="2" vspace="3" border="0"></a></td>
100
      </tr>
101
    </table>
102
      <table width="570" border="0" cellspacing="0" cellpadding="1">
103
        <tr>
104
          <td background="images/bg_bage_2.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
105
            <tr>
106
              <td background="images/bg_form.gif"><table width="100%"  border="0" cellspacing="0" cellpadding="10">
107
                <tr>
108
                  <td class="body_txt"><span class="body_h1"><img src="icons/i_user_lrg.gif" width="13" height="17" align="absmiddle">&nbsp;Update Password</span> <br>
109
      Please confirm your password. <br>
110
      <hr width="100%" size="1" noshade color="#ACA899"></td>
111
                </tr>
112
                <tr>
113
                  <td align="center" valign="top">
114
				  <table width="100"  border="0" cellspacing="2" cellpadding="0">
115
                      <tr>
116
                        <td nowrap class="form_iname">Confirm Password</td>
117
                        <td><input name="cpassword" type="password" class="form_ivalue" size="20"></td>
118
                      </tr>
119
                      <tr>
120
                        <td nowrap class="form_iname" valign="top">&nbsp;</td>
121
                        <td valign="top">&nbsp;</td>
122
                      </tr>
123
                  </table></td>
124
                </tr>
125
                <tr>
126
                  <td background="images/bg_login.gif">
127
				  <table width="100%"  border="0" cellspacing="0" cellpadding="0">
128
                      <tr>
129
                        <td><%=ProgressBar()%></td>
130
                        <td align="right"><input name="btn" type="submit" class="form_btn" value="Login"></td>
131
                      </tr>
132
                  </table></td>
133
                </tr>
134
              </table>
135
			  </td>
136
            </tr>
137
          </table></td>
138
        </tr>
139
      </table>
140
	  <!-- ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ -->
141
	  </td>
142
  </tr>
143
  <tr>
144
    <td bgcolor="#FFFFFF"><img src="images/spacer.gif" width="1" height="42"></td>
145
  </tr>
146
<%=objPMod.ComposeHiddenTags()%>
147
<input type="hidden" name="user_name" value="<%=Request("user_name")%>">
148
<input type="hidden" name="action" value="true">
149
</form>  
150
</table>
151
<!-- FOOTER ++++++++++++++++++++++ -->
152
<!--#include file="_footer.asp"-->
153
<!-- +++++++++++++++++++++++++++++ -->
154
</body>
155
</html>
156
<%
157
'------------ RUN AFTER PAGE RENDER -----------
158
Set objPMod = Nothing
159
'----------------------------------------------
160
%>
161
<!--#include file="common/globals_destructor.asp"-->