Subversion Repositories DevTools

Rev

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

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