changepassword.asp

asp开发 asp开发 asp开发 asp开发

<!-- #include file="auctionlib.asp" -->
<%
'*************************************************************************
'******* XcAuction Copyright 1999 XCENT    www.xcent.com **************
'*************************************************************************
sErrors = Request.Cookies("XcClassErrors")
Response.Cookies("XcClassErrors") = ""

Call DoPageHeader

Response.Write("<FONT FACE=" & chr(34) & sFont & chr(34) & ">")
	If Len(Trim(sErrors)) > 0 Then
		Response.Write  "<SMALL><CENTER>" & sErrors & "</CENTER></SMALL><P>"
	End If
Response.Write("<CENTER><BIG><BIG>变更密码</BIG></BIG>")
Response.Write("<FORM METHOD=""POST"" ACTION=""changepasspost.asp"">")
Response.Write("<TABLE CELLSPACING=""0"" BORDER=""0"" cellpadding=""2"" WIDTH=""450"">")
Response.Write("<TR bgcolor=" & chr(34) & linecolor & chr(34) & "><TD COLSPAN=""2""> </TD></TR>")
Response.Write("<TR bgcolor=" & chr(34) & topcolor & chr(34) & ">")
Response.Write("<TD COLSPAN=""2"">&nbsp;</TD>")
Response.Write("</TR>")
Response.Write("<TR bgcolor=" & chr(34) & linecolor & chr(34) & "><TD COLSPAN=""2""> </TD></TR>")
Response.Write("<TR><TD COLSPAN=""2""><B>您目前的使用者名称和密码</B></TD></TR>")
Response.Write("<TR><TD><SMALL>用户名</SMALL></TD><TD><INPUT TYPE=""TEXT"" NAME=""UserName""></TD></TR>")
Response.Write("<TR><TD><SMALL>密码</SMALL></TD><TD><INPUT TYPE=""PASSWORD"" NAME=""Password""></TD></TR>")
Response.Write("<TR><TD><SMALL>再输一次密码</SMALL></TD><TD><INPUT TYPE=""PASSWORD"" NAME=""ConfirmPassword""></TD></TR>")
Response.Write("<TR><TD COLSPAN=""2""><B>您的新密码</B></TD></TR>")
Response.Write("<TR><TD><SMALL>新密码</SMALL></TD><TD><INPUT TYPE=""PASSWORD"" NAME=""NewPassword""></TD></TR>")
Response.Write("<TR><TD><SMALL>再输入一次新密码</SMALL></TD><TD><INPUT TYPE=""PASSWORD"" NAME=""ConfirmNewPassword""></TD></TR>")
Response.Write("<TR><TD>&nbsp;</TD><TD><INPUT TYPE=""SUBMIT"" VALUE=""变更密码""></SMALL></TD></TR>")

Response.Write("<TR bgcolor=" & chr(34) & linecolor & chr(34) & "><TD COLSPAN=""2""> </TD></TR>")
Response.Write("<TR bgcolor=" & chr(34) & topcolor & chr(34) & ">")
Response.Write("<TD COLSPAN=""2""><CENTER><SMALL>")
Call AuctionNavigation
Response.Write("</SMALL></CENTER></TD>")
Response.Write("</TR>")
Response.Write("<TR bgcolor=" & chr(34) & linecolor & chr(34) & "><TD COLSPAN=""2""> </TD></TR>")

Response.Write("</TABLE></FORM>")


Call DoPageFooter
%>