⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 changepwd.asp

📁 东北农业大学教学管理系统
💻 ASP
字号:
<!--#include file="Conn.asp"-->
<!--#include file="Inc/CheckUser.asp"-->
<%
Set rs = Server.CreateObject("ADODB.RecordSet")

if Request.Form("act") = "change" then
	dim oldpass,newpass,rnewpass
	oldpass = Trim(Request.Form("oldpass"))
	newpass = Trim(Request.Form("newpass"))
	rnewpass = Trim(Request.Form("rnewpass"))
	if newpass = "" and newpass <> rnewpass then
		Response.Write("<script>alert('对不起,您两次输入的密码不一致,请重新输入!');window.history.back();</script>")
		Response.End()
	end if
	sql = "Select userpass From [userinfo] Where id = " & Cint(Session("UID"))
	set rs = conn.execute(sql)
	if rs.BOF or rs.EOF then
		Response.Write("<script>alert('对不起,提取信息发生错误,请重试!');window.history.back();</script>")
		Response.End()
	else
		if oldpass <> rs(0) then
			Response.Write("<script>alert('对不起,您的旧密码输入不正确,请重新输入!');window.history.back();</script>")
			Response.End()
		else
			conn.execute("Update [userinfo] Set sex = "&Request.Form("sex")&",age = '"&Request.Form("age")&"',class = '"&Request.Form("class")&"' Where id = " & Cint(Session("UID")))
			Response.Write("<script>alert('资料修改成功!');</script>")
		end if
	end if
	rs.Close()

	if newpass <> "" then
		sql= "Update [userinfo] Set userpass = '"&newpass&"' where userpass = '"&oldpass&"' and id = " & Cint(Session("UID"))
		conn.execute(sql)
		Response.Write("<script>alert('修改密码成功,请记住新密码: "&newpass&"');</script>")
	end if
end if
%>
<HTML>
	<HEAD>
		<title>工程学院教学管理系统 —— 更改用户资料 </title>
		<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
		<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
		<meta http-equiv="Expires" content="0">
		<meta http-equiv="Pragma" content="no-cache">
		<LINK href="Style/style.css" rel="stylesheet">
		<script language="javascript" type="text/javascript">
		<!--
		document.write("<BASE onmouseover='window.status=\"欢迎使用 工程学院教学管理系统系统\";return'>");
			
		//函数名:fucCheckNUM
		//功能介绍:检查是否为数字
		//参数说明:要检查的数字
		//返回值:1为是数字,0为不是数字
		function fucCheckNUM(NUM)
		{
			var i,j,strTemp;
			strTemp="0123456789";
			if ( NUM.length== 0)
				return 0
			for (i=0;i<NUM.length;i++)
			{
				j=strTemp.indexOf(NUM.charAt(i));	
				if (j==-1)
				{
				//说明有字符不是数字
					return 0;
				}
			}
			//说明是数字
			return 1;
		}

		function checkData()
		{
			var obj
			obj = document.index;
			
			if(obj.oldpass.value == "")
			{
				alert("请输入旧密码!");
				obj.oldpass.focus();
				return false;
			}
			else if(obj.newpass.value != obj.rnewpass.value)
			{
				alert("对不起,两次密码输入不一致,请重新输入!");
				obj.newpass.focus();
				return false;
			}
			else if(fucCheckNUM(obj.age.value) == 0)
			{
				alert("对不起,年龄必须是数字,请输入数字!");
				obj.age.focus();
				return false;
			}
		}

		//-->
		</script>
	</HEAD>
	<body background="Images/bg.jpg" topmargin="0" leftmargin="0">
	<%
	sql = "Select * From [userinfo] Where id = " & Session("UID")
	rs.Open sql, conn,1,1
	if not(rs.BOF or rs.EOF) then
	%>
		<form name="index" method="post" action="" onsubmit="return checkData()" ID="Form1">
		<input type="hidden" name="act" value="change">
			<table class="borderon" id="control" cellSpacing="0" cellPadding="0" width="100%" border="0">
				<tr>
					<td height="20" width="100"></td>
					<td width="100"></td>
			</table>
			<table cellSpacing="0" cellPadding="0" border="0" height="80%" width="100%" ID="Table1">
				<tr>
					<td vAlign="top" height="50">
						<ol style="line-height:150%">
							<li>
								修改用户的资料</li>
							<li>
								修改用户的密码</li>
							<li>
								要求必须输入旧密码才能对资料进行修改</li>
					</td>
				</tr>
				<tr>
					<td align="center">
						<div align="center">
						<table width="50%" border="0" cellpadding="6" cellspacing="1" bgcolor="#000000"
							ID="Table2">
							<tr>
								<td colspan="2" align="center" style="background-image: url('')" bgcolor="#99A6BF"><b>修 改 资 料</b></td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF" width="30%">
									<b>旧密码:</b></td>
								<td bgcolor="#FFFFFF">
									<input type="password" name="oldpass" class="text" ID="Text1"> <font color=red>* 必须输入</font></td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF">
									<b>新密码:</b></td>
								<td bgcolor="#FFFFFF">
									<input type="password" name="newpass" class="text" ID="Password1"></td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF" valign="top">
									<b>确 &nbsp;&nbsp;认:</b></td>
								<td bgcolor="#FFFFFF">
									<input type="password" name="rnewpass" class="text" ID="Password2"></td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF" valign="top">
									<b>用户名:</b></td>
								<td bgcolor="#FFFFFF">
									<%=rs("userid")%></td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF" valign="top">
									<b>性 &nbsp;&nbsp;别:</b></td>
								<td bgcolor="#FFFFFF">
									<select name="sex">
										<option value="1" <%if rs("sex") = 1 then Response.Write "Selected"%>>男</option>
										<option value="0" <%if rs("sex") = 0 then Response.Write "Selected"%>>女</option>
									</select></td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF" valign="top">
									<b>年 &nbsp;&nbsp;龄:</b></td>
								<td bgcolor="#FFFFFF">
									<input type="text" name="age" class="text" size="5" value="<%=rs("age")%>"> 岁</td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF" valign="top">
									<b>所属学院:</b></td>
								<td bgcolor="#FFFFFF">
									<%=rs("college")%></td>
							</tr>
							<tr>
								<td bgcolor="#E7EAEF" valign="top">
									<b>所在专业:</b></td>
								<td bgcolor="#FFFFFF">
									<input type="text" name="class" class="text" ID="Text5" size="30" value="<%=rs("class")%>"></td>
							</tr>
							<tr>
								<td bgcolor="#99A6BF" align="middle" colspan="2">
									<input type="submit" name="submit" value=" 修 改 " onMouseOver="this.className='button1_o';"
										onMouseOut="this.className='button1';" class="button1" ID="Submit1"> &nbsp;&nbsp;
									<input type="reset" name="reset" value=" 重 置 " onMouseOver="this.className='button1_o';"
										onMouseOut="this.className='button1';" class="button1" ID="Reset1"></td>
							</tr>
						</table>
						</div>
					</td>
				</tr>
			</table>
		</form>
		<%
		end if
		rs.Close()
		set rs = Nothing
		
		CloseDataBase
		%>
		<script language="javascript" src="copyright.htm" type="text/javascript"></script>
	</body>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -