Subversion Repositories DevTools

Rev

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

Rev Author Line No. Line
5357 dpurdie 1
<%@LANGUAGE="VBSCRIPT"%>
2
<%
3
'=====================================================
4
'|                                                   |
5
'|				    	Change Password			     |
6
'|                                      			 |
7
'=====================================================
8
%>
9
<%
10
Option explicit
11
' Good idea to set when using redirect
12
Response.Expires = 0	' always load the page, dont store
13
%>
14
<!--#include file="common/conf.asp"-->
15
<!--#include file="common/globals.asp"-->
16
<!--#include file="common/formating.asp"-->
17
<!--#include file="common/qstr.asp"-->
18
<!--#include file="common/common_subs.asp"-->
19
<!--#include file="sec/Crypt.asp"-->
20
<%
21
'------------ ACCESS CONTROL ------------------
22
%>
23
<!--#include file="_access_control_login.asp"-->
24
<!--#include file="_access_control_general.asp"-->
25
<%
26
'------------ Variable Definition -------------
27
'------------ Constants Declaration -----------
28
'------------ Variable Init -------------------
29
'----------------------------------------------
30
%>
31
<%
32
Sub Change_Password ( NNuser_id, SSoldpassword, SSpassword )
33
	Dim rsTemp, Query_String
34
	Query_String = _
35
	"SELECT * FROM users WHERE user_id= "& NNuser_id
36
	Set rsTemp = OraDatabase.DbCreateDynaset( Query_String, cint(0))
37
 
38
	If rsTemp.Fields("domain") <> "" Then
39
		' No need for password
40
		Session("AdditionalParams") = "$USERNAME$,"& objAccessControl.UserName
5957 dpurdie 41
        Call Destroy_All_Objects
5357 dpurdie 42
		Response.Redirect("message.asp?msg=202-15")
43
 
44
	Else
45
		If EnCrypt( SSoldpassword ) <> rsTemp.Fields("user_password") Then
46
			' Old Password Mismatch
5957 dpurdie 47
            Call Destroy_All_Objects
5357 dpurdie 48
			Response.Redirect("message.asp?msg=401-8")
49
		End If
50
 
51
	End If
52
 
53
	' All conditions mat. Change password
54
	'update fields
55
	rsTemp.Edit
56
	rsTemp.Fields("user_password").Value = EnCrypt( SSpassword )
57
	rsTemp.Update
58
 
59
	rsTemp.Close
60
	Set rsTemp = nothing
61
End Sub
62
%>
63
<%
64
'--- Process submition ---
65
If CBool(QStrPar("action")) Then
66
	' All mandatory parameters FOUND
67
	Call Change_Password ( objAccessControl.UserId, Request("FRoldpassword"), Request("FRpassword") )
5957 dpurdie 68
    Call Destroy_All_Objects
5357 dpurdie 69
	Response.Redirect("message.asp?msg=200-7")
70
End If
71
%>
72
<html>
73
<head>
74
<title>Release Manager</title>
75
<link rel="shortcut icon" href="<%=FavIcon%>"/>
76
<meta HTTP-EQUIV="Pragma" CONTENT="no-cache">
77
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
6579 dpurdie 78
<link rel="stylesheet" href="images/release_manager_style.css?ver=<%=VixVerNum%>" type="text/css">
79
<link rel="stylesheet" href="images/navigation.css?ver=<%=VixVerNum%>" type="text/css">
80
<script language="JavaScript" src="images/common.js?ver=<%=VixVerNum%>"></script>
7063 dpurdie 81
<!--#include file="_jquery_includes.asp"-->
5984 dpurdie 82
<!--#include file="_menu_def.asp"-->
6579 dpurdie 83
<script language="JavaScript1.2" src="images/popup_menu.js?ver=<%=VixVerNum%>"></script>
5357 dpurdie 84
<!-- TIPS -->
6579 dpurdie 85
<script language="JavaScript" src="images/tipster.js?ver=<%=VixVerNum%>"></script>
86
<script language="JavaScript" src="images/_help_tips.js?ver=<%=VixVerNum%>"></script>
5357 dpurdie 87
</head>
88
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" >
89
<!-- HEADER -->
90
<!--#include file="_header.asp"-->
91
<!-- BODY ---->
92
<table width="100%" border="0" cellspacing="0" cellpadding="0">
93
  <tr> 
94
    <td width="1%" background="images/bg_member_dark.gif" valign="top"> 
95
      <!-- MEMBERS MENU ---------------------------------------------->
96
	  <!--#include file="members_menu_def.asp"-->
97
	  <%Call Member_Menu( "my details" )%>
98
      <!--  MEMBERS MENU END ------------------------------------------>
99
    </td>
5984 dpurdie 100
    <td width="1%" valign="top" background="images/bg_member_light.gif"></td>
5357 dpurdie 101
    <td rowspan="2" valign="top" width="1%" background="images/bg_member_light.gif" nowrap> 
102
      <!------------------------------------------->
103
      <br>
104
      <span class="mmb_ttl">Change Password</span><br>
105
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
106
        <form name="chpass" method="post" action="members_change_password.asp">
107
          <tr> 
108
            <td width="1%">&nbsp;</td>
109
            <td><img src="images/h_trsp_dot.gif" width="500" height="30"></td>
110
            <td width="1%">&nbsp;</td>
111
          </tr>
112
          <tr> 
113
            <td align="left" valign="top" width="1%" background="images/bg_member_dark.gif"><img src="images/h_trsp_dot.gif" width="13" height="13"></td>
114
            <td background="images/bg_member_dark.gif" align="left" class="wform_ttl">&nbsp;</td>
115
            <td align="right" valign="top" width="1%" background="images/bg_member_dark.gif">&nbsp;</td>
116
          </tr>
117
          <tr> 
118
            <td width="1%" bgcolor="#FFFFFF"><img src="images/h_trsp_dot.gif" width="10" height="100"></td>
119
            <td bgcolor="#FFFFFF" valign="top" class="form_item"> <br>
120
              <table width="100%" border="0" cellspacing="1" cellpadding="2">
121
                <tr> 
122
                  <td width="1%"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
123
                  <td width="1%" nowrap class="form_group" valign="bottom">&nbsp;</td>
124
                  <td nowrap width="100%" align="right" class="form_step"><img src="images/h_trsp_dot.gif" width="350" height="10"></td>
125
                </tr>
126
                <tr> 
127
                  <td width="1%">&nbsp;</td>
128
                  <td width="1%" nowrap class="form_field" background="images/bg_form_lightbluedark.gif">OLD Password</td>
129
                  <td nowrap width="100%" background="images/bg_form_lightbluedark.gif"> 
130
                    <input type="password" name="FRoldpassword" class="form_item">
131
                  </td>
132
                </tr>
133
                <tr> 
134
                  <td width="1%">&nbsp;</td>
135
                  <td width="1%" nowrap class="form_field">&nbsp;</td>
136
                  <td nowrap width="100%">&nbsp;</td>
137
                </tr>
138
                <tr> 
139
                  <td width="1%">&nbsp;</td>
140
                  <td width="1%" nowrap class="form_field" background="images/bg_form_lightbluedark.gif">NEW Password</td>
141
                  <td nowrap width="100%" background="images/bg_form_lightbluedark.gif"> 
142
                    <input type="password" name="FRpassword" class="form_item">
143
                  </td>
144
                </tr>
145
                <tr> 
146
                  <td width="1%">&nbsp;</td>
147
                  <td width="1%" nowrap class="form_field" background="images/bg_form_lightbluedark.gif">NEW Password Confirm </td>
148
                  <td nowrap width="100%" background="images/bg_form_lightbluedark.gif"> 
149
                    <input type="password" name="FRpasswordc" class="form_item">
150
                  </td>
151
                </tr>
152
 
153
                <%If (objAccessControl.Domain <> "") Then %>
154
                  <td width="1%">&nbsp;</td>
155
                  <td width="1%" nowrap class="form_field err_alert" colspan=2>
156
                  The User Password cannot be managed from Release Manager<br>as the User is configured to use Domain Authentication</td>
157
                </tr>
158
                <% End If %>
159
 
160
                <tr> 
161
                  <td width="1%">&nbsp;</td>
162
                  <td width="1%" nowrap class="form_field"><img src="images/h_trsp_dot.gif" width="1" height="1"></td>
163
                  <td nowrap width="100%"> 
164
                    <input type="hidden" name="action" value="true">
165
                    <%If (objAccessControl.Domain <> "") Then %>
166
                        <input disabled type="submit" name="btn" value="Change" class="form_btn_disabled" >
167
                    <% Else %>
168
                        <input type="submit" name="btn" value="Change" class="form_btn" onClick="MM_validateForm('FRoldpassword','OLD Password','RisCleanStr','FRpassword','NEW Password','RisCleanStrisChangePasswordinLength6:');return document.MM_returnValue">
169
                    <% End If %>
170
                    <input type="reset" name="btn" value="Cancel" class="form_btn" onClick="history.back();">
171
                    <br>
172
                    <br>
173
                  </td>
174
                </tr>
175
              </table>
176
              <br>
177
              <br>
178
            </td>
179
            <td width="1%" background="images/lbox_bgside_white.gif">&nbsp;</td>
180
          </tr>
181
          <tr> 
182
            <td width="1%" background="images/bg_member_dark.gif" valign="bottom"><img src="images/h_trsp_dot.gif" width="13" height="13"></td>
183
            <td background="images/bg_member_dark.gif"></td>
184
            <td width="1%" background="images/bg_member_dark.gif" valign="bottom" align="right"><img src="images/h_trsp_dot.gif" width="13" height="13"></td>
185
          </tr>
186
        </form>
187
      </table>
188
      <!-------------------------------------------------------->
189
      <br>
190
    </td>
191
    <td rowspan="2" valign="bottom" width="100%" background="images/bg_member_light.gif" align="right"><img src="images/bg_img_member.gif" width="160" height="230" vspace="10" hspace="10"></td>
192
  </tr>
193
  <tr> 
194
    <td valign="bottom" align="center" background="images/bg_member_dark.gif"><img src="images/img_members.gif" width="81" height="57" vspace="20" hspace="30"></td>
195
    <td background="images/bg_member_light.gif" valign="top"><img src="images/h_trsp_dot.gif" width="100" height="400"></td>
196
  </tr>
197
</table>
198
<!-- FOOTER -->
199
<!--#include file="_footer.asp"-->
200
</body>
201
</html>