Subversion Repositories DevTools

Rev

Rev 5506 | Rev 5984 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5506 Rev 5957
Line 49... Line 49...
49 
'--- Process submition ---
 49 
'--- Process submition ---
50 
If CBool(QStrPar("action")) Then
 50 
If CBool(QStrPar("action")) Then
51 
	' All mandatory parameters FOUND
 51 
	' All mandatory parameters FOUND
52 
	Call Update_LogIn_Details ( objAccessControl.UserId, QStrPar("FRpassword"))
 52 
	Call Update_LogIn_Details ( objAccessControl.UserId, QStrPar("FRpassword"))
53 
	Session.Abandon
 53 
	Session.Abandon
- 
 
 54 
    Call Destroy_All_Objects
54 
	Response.Redirect("message.asp?msg=200-9")
 55 
	Response.Redirect("message.asp?msg=200-9")
55 
End If
 56 
End If
56 
%>
 57 
%>
57 
<html>
 58 
<html>
58 
<head>
 59 
<head>
Line 169... Line 170...
169 
</table>
 170 
</table>
170 
<!-- FOOTER -->
 171 
<!-- FOOTER -->
171 
<!--#include file="_footer.asp"-->
 172 
<!--#include file="_footer.asp"-->
172 
</body>
 173 
</body>
173 
</html>
 174 
</html>
174 
<%
 - 
 
175 
Call Destroy_All_Objects
 - 
 
176 
%>
 - 
 
177 

            175