Subversion Repositories DevTools

Rev

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

Rev 5642 Rev 5958
Line 48... Line 48...
48 
'--- Process submition ---
 48 
'--- Process submition ---
49 
If CBool(QStrPar("action")) Then
 49 
If CBool(QStrPar("action")) Then
50 
	' All mandatory parameters FOUND
 50 
	' All mandatory parameters FOUND
51 
	Call Update_LogIn_Details ( objAccessControl.UserId, QStrPar("FRpassword"))
 51 
	Call Update_LogIn_Details ( objAccessControl.UserId, QStrPar("FRpassword"))
52 
	Session.Abandon
 52 
	Session.Abandon
- 
 
 53 
    Call Destroy_All_Objects
53 
	Response.Redirect("message.asp?msg=200-9")
 54 
	Response.Redirect("message.asp?msg=200-9")
54 
End If
 55 
End If
55 
%>
 56 
%>
56 
<html>
 57 
<html>
57 
<head>
 58 
<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