<!--#include file="includes/topnav.aspx"-->


<%

	if request("Save") <> "" then
		if request("Password") <> request("Confirm") then
			With Response
				.write ("<center><b><font size=""2"" color=""#CC0000"">")
				.write ("New Passwords Do Not Match<hr>")
				.write ("</font></b></center>")
			
			End With
		else
			Try
			
				Dim CurPass as String = iif(Request("CurrentPassword") ="", "NULL", "'" & request("CurrentPassword") & "'")
				Dim NewPass as String = iif(Request("Password") ="", "NULL", "'" & request("Password") & "'")
			
				d.getDataSPA("sp_password " & CurPAss & ", " & NewPass & ", '" & Request("LoginName") & "'")
				
				DisplayMessage("<h2>Password changed</h2><br><Br><a href=""javascript: window.close();"">Click Here to Close</a>")
			
			Catch e as Exception
				
				DisplayError(e)
			
			End Try
		
		end if
	End if

%>

<form action="changePassword.aspx">
<input type="hidden" name="save" value="true">
<table width="100%" cellspacing="0" cellpadding="3" class="TableStyle">
<tr><td class="WindowHeader">
	<% DrawTitle ("Change Login Password", "javascript: window.close();") %>
</td></tr>
<tr><td class="TableHeader" height="100%" valign="top" style="padding: 10px;">

<table width="100%" class="MainStyle">
<tr><td valign="top" align="right">
	<%= ("<img src=""images/large_Icons_Login.gif"">") %>
</td><td valign="top" align="center">
	<table class="MainStyle">
	<tr><Td>
	<input type="hidden" Name="LoginName" value="<%= Request("LoginName") %>">
	<b>Current Password:</b><br>
	<input type="password" Name="CurrentPassword">
	<br>
	<b>New Password:</b><br>
	<input type="password" name="Password">
	<br>
	<b>Confirm Password:</b><br>
	<input type="password" name="Confirm">
	</td></tr>
	</table>
</td></tr>
<tr><td></td>
<td align="center">
	<br>
	<input type="button" value="Cancel" onClick="javascript: window.close();">
	<input type="submit" value="Change">
	<br><Br>
</td></tr>
</table>
</td></tr>
</table>
</form>


<!--#include file="includes/bottom.aspx"-->