pwdedit.asp

来自「本程序所有数据库文件都以.sql文件保存在Database文件夹里； 2、首先在」· ASP 代码 · 共 24 行

<!--#include file="../conndb.asp"-->
<html>
<head>
<title>用户管理</title>
</head>
<body>
<%
	uid = request.queryString("uid")
	orgpwd = request.form("orgpwd")
	'判断是否存在此用户
	sql = "Select * From Company Where CName='"&uid&"' And Pwd='"&orgpwd&"'"
	Set rs = Conn.Execute(sql)
	'response.write sql
	if rs.Eof Then
		Response.Write "<Script language='JavaScript'>alert('不存在此用户名或密码错误！');history.go(-1);</script>"
	Else
	    Conn.Execute("Update Company set PWd='"&request.form("pwd")&"' where CName='"&uid&"'")
	    Session("user_id") = uid
	    Session("user_pwd") = Request.Form("pwd")
	    Response.Write "<Script language='JavaScript'>alert('更改密码成功！');history.go(-1);</script>"
	End If	   
%>	
</body>
</html>