📄 pwd_ch.asp

📁 企业信息化管理系统：针对的是一个计算机配件生产公司为背景实现的。

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>密码修改</title>
</head>
<style type="text/css">
<!--
div {
	margin-top: 140px;
	font-family: Arial, Helvetica, sans-serif;	
	font-size: 26px;
	text-align: center;
}
-->
</style>
<body>
<!--#include file ="Connections/auto.asp"-->
<%
a=Trim(Request.form("TX_NewP"))
b=Trim(Request.form("TX_NewPR"))
%>
<%   
  if StrComp(a,b)=0 then 
     
     set RS = server.CreateObject("ADODB.Recordset")
	 sname = "update Login set PWD='"&b&"' where ID ='"& session("Rname") & "';"
	 
	 RS.open sname,CN,1,3
%>
<script language="vbscript">
  window.alert("密码已修改！")
  window.navigate("welcome.html") 
</script>
<%
     set RS=nothing
  else 
%>
<script language="vbscript">
  window.alert("输入错误，请重新输入！")
  window.navigate("PWD_Ch.htm") 
</script>
<%      
  end if
		 
		 		 	
 CN.close
 set CN=nothing 
%>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -