UC知道这里的判断语句失灵了，alert 总是执行...
来源：百度知道 编辑：UC知道 时间：2024/06/11 00:19:18
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file=connection.asp-->
<!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>
<style type="text/css">
<!--
.style1 {
font-size: 24px;
font-weight: bold;
}
.style3 {font-size: 18px; font-weight: bold; }
-->
</style>
</head>
<body><%
string1="select pwd from login where employeeid=1"
set rs=cn.execute(string1)
pw1=request.form("pw1")
pw2=request.form("pw2")
pw3=request.form("pw3")
response
<!--#include file=connection.asp-->
<!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>
<style type="text/css">
<!--
.style1 {
font-size: 24px;
font-weight: bold;
}
.style3 {font-size: 18px; font-weight: bold; }
-->
</style>
</head>
<body><%
string1="select pwd from login where employeeid=1"
set rs=cn.execute(string1)
pw1=request.form("pw1")
pw2=request.form("pw2")
pw3=request.form("pw3")
response
'如果你数据库中的密码没有MD5的话，下面的应该可以通过，或者你有没有区分大小写的限制
'不过你的代码写的很有匈奴的风格。。。。。
Dim query
query="select pwd from login where employeeid=1"
set rs=cn.execute(query)
pw1=Trim(request.form("pw1"))
pw2=Trim(request.form("pw2"))
pw3=Trim(request.form("pw3"))
pw=Trim(rs("pwd"))
If pw1="" Then
OpenDialog("请输入密码!",True)
End If
If pw="" Then
OpenDialog("数据库密码为空!",True)
End If
pw1 = Replace(pw1,"'","")
pw = Replace(pw,"'","")
if pw<>pw1 then
'如果无论如何都执行“密码错误”的提示，你可以用下面的方法查看一下数据库读出的 rs("pwd") 密码数据与 request.form("pw1") 请求的密码是否相同。
OpenDialog("密码错误!\n\npw="&pw&"\n\npw1="&pw1,True)
else if pw2<>pw3 then
OpenDialog("新密码和确认密