0591_admin_pass_edit.asp

来自「烈火之家整站程序 本程序集商业娱乐一体,本来是给自己用的但是我的国外空间支持不够」· ASP 代码 · 共 66 行

<%@ language="VBScript"%>
<!--#include file="admin.asp"-->
<!--#include file="conn.asp"-->
<%
id=request("id")
set rs=server.createobject("adodb.recordset")
sqltext="select * from 0591_User where Id=" & id
rs.open sqltext,conn,1,1
%>

<!--#include file="../inc/head.asp"-->
<SCRIPT language=javascript id=clientEventHandlersJS>
<!--


function form1_onsubmit()
{
if (document.FORM1.pwd1.value!=document.FORM1.pwd2.value)
{
alert ("请确认您的密码。");
document.FORM1.pwd1.value='';
document.FORM1.pwd2.value='';
document.FORM1.pwd1.focus();
return false;
}
}


//-->
</SCRIPT>
<BR>
<table cellpadding="2" cellspacing="1" border="0" width="560" align="center" class="a2">
	<tr>
		<td class="a1" height="25" align="center"><strong>管理员密码修改</strong></td>
	</tr>
	<tr class="a4">
		<td align="center">
			<FORM language=javascript name=FORM1  onsubmit="return form1_onsubmit()" action=0591_reditok.asp?Uid=<%=rs("Id")%> method=post>
			<INPUT type=hidden value=<%=rs("UserName")%> name=uid>
				<table width="50%" border="0" align="center" cellpadding="0" cellspacing="2">
					<tr> 
						<td height="20" colspan="2">&nbsp;</td>
					</tr>
					<tr> 
						<td width="29%" height="22"> <div align="right">管理员：</div></td>
						<td width="71%"><%=rs("UserName")%></td>
					</tr>
					<tr> 
						<td height="22"> <div align="right">新密码：</div></td>
						<td><input name="pwd1" type="text" size="16" maxlength="20"></td>
					</tr>
					<tr> 
						<td height="22"> <div align="right">密码确认：</div></td>
						<td><input name="pwd2" type="text" size="16" maxlength="20"></td>
					</tr>
					<tr> 
						<td height="22" colspan="2"><div align="center"><INPUT  type=submit value='确认修改' name=Submit2></div></td>
					</tr>
				</table>
			</form>
		</td>
	</tr>
</table>
<BR>
<%htmlend%>