标题:[求助]那位大哥帮我看看用户密码修改的源代码啊?
取消只看楼主
kleiven
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2005-5-30
 问题点数:0 回复次数:1 
[求助]那位大哥帮我看看用户密码修改的源代码啊?

今正做一个密码修改程序,有个问题要请教高手。

密码修改界面如下:

界面中有四个文本框,二个命令按钮,

三个文本框name属性依次为:te1、te2、te3、te4, te1输入用户名 te2要求用户输入原密码,te3与te4要求用户两次输入新密码。

二个命令按钮一个为“确定”键,一个为“退出”。

密码数据调用表"用户"中的user和pw字段中的数据。user字段为字符型,pw字段为数值型 "用户"表中的pw是换算的,输入密码=pw-26

资源位置在d:\zs\

“确定”键的代码如下:

set path to d:\zs\data\

use 用户 if alltrim(thisform.te2.value)==用户.user pw and alltrim(thisform.te3.value)==alltrim(thisform.te3.value)

do 用户.user pw==alltrim(thisform.te3.value)

thisform.release

else endif 在调用是出现错误,哪位大哥帮我修改一下.请指正

[此贴子已经被作者于2005-5-30 12:51:25编辑过]

搜索更多相关主题的帖子: quot 源代码 eqn 密码 sum 
2005-05-30 12:49
kleiven
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2005-5-30
得分:0 

set path to d:\zs\datause 用户.dbf if alltrim(thisform.text2.value)==user.and.pw=thisform.text2.value and thisform.text3.value=thisform.te4.value REPLACE pw WITH thisform.text3.value thisform.release else endif

这段是我改的代码,但是还是用不了! 请各位指教!

2005-06-01 13:58



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-19680-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.462215 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved