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

密码修改界面如下：

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

三个文本框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编辑过]

    第一 do 用户.user==alltrim(thisform.te3.value)  用do 是哪门子意思啊？
第二，上一句的and   应该有两个点号    请改为     .and.   看不清请刷黑看看。
第三，更新命令用REPLACE，，，例如REPLACE 用户.user pw  WITH   alltrim(thisform.te3.value)
还有问题的请加我，我有这种现成的产品。QQ287156136

还有，在修改纪录时，尽量将表独占使用，方法很简单：
只要像这样  use 用户.dbf  exclusive    具体不写了。或者后面加excl

我建议你在好好的看看书，看你上面的代码，我觉得你在VFP上没有下多少功夫，

给你个提标吧，如果你不能让系统自动判断进入的操作员是谁，那么你可以先查找是否有输入的这个操作员，如果有，再核对其原密码是否与输入的原密码相同，如果相同，再看两次输入的新密码是否一致，如果一致的话，用新输入的密码替换原密码即可。说的有点麻烦，其实如果你编程的思想明确了，代码不是问题的

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

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

    天啊，你还是没有在  and  加上两点。  请看第二个and。   如果嫌麻烦，干脆发源代码给我看看。那我会更清楚哪个地方出错。

    还有，后面在thisform.value之类的是需要加上alltrim()函数上去，否则系统会把两连连的空格也当作是要输入的条件。