2.8w+
社区成员
小妹求教一个在客户管理系统中修改密码时报错的问题啊
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp，行242
ADODB.Recordset 错误 '800a0bcd'
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/hy/adminedit1.asp，行35
具体代码为：<%
dim mz,qx
mz=session("user")
qx=session("pass")
dim username,password
pass=request("pass")
pass1=request("pass1")
dim rs
set rs=Server.CreateObject("Adodb.Recordset")
rs.open "select pass from admin where user='"&mz&"'",conn,1,3
if pass<>pass1 or pass="" or pass1="" then
response.write"<script>alert('两次密码输入有误,请重新输入！');history.back();</script>"
else
rs("pass")=pass
rs.update
session("user")=user
session("pass")=pass
response.write "<script>alert('恭喜您，资料修改成功！');location.href='adminlogin.asp';</Script>"
end if
%>
缺少 'End'
/iisHelp/common/500-100.asp，行242
ADODB.Recordset 错误 '800a0bcd'
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/hy/adminedit1.asp，行35
具体代码为：<%
dim mz,qx
mz=session("user")
qx=session("pass")
dim username,password
pass=request("pass")
pass1=request("pass1")
dim rs
set rs=Server.CreateObject("Adodb.Recordset")
rs.open "select pass from admin where user='"&mz&"'",conn,1,3
if pass<>pass1 or pass="" or pass1="" then
response.write"<script>alert('两次密码输入有误,请重新输入！');history.back();</script>"
else
rs("pass")=pass
rs.update
session("user")=user
session("pass")=pass
response.write "<script>alert('恭喜您，资料修改成功！');location.href='adminlogin.asp';</Script>"
end if
%>
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
pengfei1227 2004-08-11
谢了，你们所说在方法我还没用IIS就出了点问题，重新装不上。
sunangle 2004-08-11
数据库中没有记录啊，要加个判断才可以啊
gu1dai 2004-08-11
缺少end请检查if 是否与end对应
必须一一对应，你肯定是某个if没有相应的end if做结束
所需操作要求当前记录是因为你没有在数据库中取到记录
请检查你的where判断是否正确。可以这样检查
username=request（“username”）
response.write username'检查username值是否存在
response.end
....select * from 表名 where username='"&username&"'
必须一一对应，你肯定是某个if没有相应的end if做结束
所需操作要求当前记录是因为你没有在数据库中取到记录
请检查你的where判断是否正确。可以这样检查
username=request（“username”）
response.write username'检查username值是否存在
response.end
....select * from 表名 where username='"&username&"'
古侠 2004-08-11
对，加个判断语句
xiaobird1 2004-08-11
rs.open "select pass from admin where user='"&mz&"'",conn,1,3
If Not rs.Eof Then
if pass<>pass1 or pass="" or pass1="" then
response.write"<script>alert('两次密码输入有误,请重新输入！');history.back();</script>"
else
rs("pass")=pass
rs.update
session("user")=user
session("pass")=pass
response.write "<script>alert('恭喜您，资料修改成功！');location.href='adminlogin.asp';</Script>"
end if
Else
Response.Write "无此用户名!"
Response.End
End If
If Not rs.Eof Then
if pass<>pass1 or pass="" or pass1="" then
response.write"<script>alert('两次密码输入有误,请重新输入！');history.back();</script>"
else
rs("pass")=pass
rs.update
session("user")=user
session("pass")=pass
response.write "<script>alert('恭喜您，资料修改成功！');location.href='adminlogin.asp';</Script>"
end if
Else
Response.Write "无此用户名!"
Response.End
End If
tosmm:土司小妹ロボ(Linebot) 是一个LINE机器人，主要提供神魔之塔游戏相关的群组服务-源码 这是一个LINE机器人，主要提供神魔之塔游戏相关的群组服务。 tosmm 这是一个LINE机器人( bot)，主要提供游戏相关的群组服务。除此之外，也是个人在业余为了满足软体工程师灵魂所打造的小玩具。 前言(Overview) ...
基于物品的协同过滤算法实现图书推荐系统 本文旨在利用基于物品的协同过滤算法，来实现一个图书推荐系统。 本文首先介绍了推荐系统的发展历史，及目前常用的几种推荐算法的介绍与比较，然后以基于物品的协同过滤算法为基础，详细介绍图书推荐系统的构建。在...
RStudio在mac上的中文编码问题 大家都知道，使用一个软件，首先就是要导入数据（像我这么懒的人才不会手动输入）虽然简单，但有时并不是一帆风顺。那么，问题来了！ 比如，从 sample.csv中导入数据到RStudio ，常用的读入格式是：data<-read....
cxyxm:程序员小妹论坛的开源代码-源码 程序员小妹是一个目前已经上线的论坛的源代码。 ##简介程序员小妹主要使用Spring Boot，Spring Security，Spring JPA开发成型。项目组装工具为Gradle，国内的小伙伴在使用的时候，记得配置过多，不然仅下载依赖就...
利用联络易的微信客户管理系统提高金融行业客户忠诚度 那么金融行业的企业如何通过客户管理系统，为客户提供深度的管理服务，提高客户的忠诚度呢，今天小妹就来为大家讲解一下吧。 对于大部分的金融服务型的企业来说，客户的忠诚度，也就是客户对企业产品的增值、.....
【必读】清华差生十年的奋斗经历-管理，你需要腾挪出一个空间 这是一篇曾经非常火的文章特别是以下这几句： 现随着普通劳动者的工资越来越高，读书无用论的说法也越来越甚。我觉得首先这是对以前大学生高高在上的一种不正常的风气的反弹，那时大学生稀缺，身价虚高，仿佛读了...
因子分析在宜居城市综合排名中的应用.doc 本文通过淮海经济区内的8个城市（宿迁、连云港、宿州、商丘、济宁、枣庄、徐州、淮北）进行经济发展、社会安定与和谐、生态环境、文化教育、生活舒适度的相关数据收集整理，构建了宜居城市的评价指标系统，借助R语言...
安卓系统管理软件_有了它我卸载了很多软件！ 又到了一个四季分明的季节，走在路上既可以看到穿短裙的小妹，也能看到棉袄大叔。在这气候冷热变化的季节里，也是流行感冒发病较高的时期，工作学习再忙平时还是要注意身体！应用名称：安卓全能工具箱应用平台：安卓...
微信客户管理系统本地部署的优势 不少企业再选择版本时，往往会有些疑惑，不知道三者的优势在哪里，今天小妹就给大家带来关于联络易微信管理系统私有云版的主要优势在哪里。 私有云版的部署深受不少中大型企业的喜爱，随着服务器的更新换代，以及...
【急！】新人小妹求教技术哥哥~ 作为一个不懂技术，却又得和技术打交道的妹子，想请教小哥哥们几个问题~ 1、 服务器的品牌有哪些，这些品牌分别哪些性能比较好？ 2、 价格便宜、性价比高的服务器有哪些？ 3、 什么是高防服务器？ 4、 什么是GPU...
手把手教你用Python破解邻家小妹wifi密码 今天给大家分享一个使用Python破解wifi密码的代码这个代码也是非常简单 用Python中的pywifi库所以需要在DOS命令下安装这个库同样使用pip install pywifi...
【深度】没看过这一篇，不要告诉我你懂无人机 【摘要】科普，我们是认真的！大家好！我是无人机本机。我的全名叫“无人驾驶飞机”，英文缩写为“UAV”。如果你认为无人机这个黑科技高富帅家族是...而我，作为民用无人机家族的一个现代分支，我是一名90后，1991年...
通过UIActivityViewController分享多图片及如何把分享时微信图标放置到第一位 第五个问题：多图片分享时，显示系统分享应用选择组件中微信不在第一个位置（点击更多，显示的活动只打开微信的情况下）。 我开始上马解决这一切的一切障碍，中间前前后后经历里很久，探索了很多方案，最终才找到...
趣图：我小妹的男友是一个程序员 嗨，各位。我小妹的男友是一个程序员 。为庆祝小妹生日，程序员男友做了一个的 App，上面有个按钮。当她摁下按钮时，男友房间有盏灯就开始闪烁，提醒他，女友需要关注。网友评论...
震惊！手把手教你用Python破解邻家小妹wifi密码 今天给大家分享一个，使用Python破解wifi密码的代码 这个代码也是非常简单，用Python中的pywifi库 所以需要在DOS命令下安装这个库 同样使用pip install pywifi 需要注意一点，就是电脑必须是要用无线网卡 1....
一个屌丝程序猿的人生（十） 原文作者：左潇龙 ... 一个动听悦耳的声音在林萧身后响起。林萧发誓，在他的印象中，这是他从出生到现在听到过最好听的声音。 “你......叫我吗？”转过身后，林萧手指着自己疑惑的问道。 “恩恩，就
