我是一个VFP的小菜。

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

密码修改界面如下：

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

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

二个命令按钮一个为“确定”键，一个为“重新输入”。

密码数据调用自由表mima中的mm字段中的数据。mm字段为字符型。

资源位置在C:\资产管理系统\

“确定”键的代码如下：

set path to c:\资产管理系统\data\

use mima

if alltrim(thisform.te1.value)==mima.mm and alltrim(thisform.te2.value)==alltrim(thisform.te2.value)

do mima.mm==alltrim(thisform.te2.value)

thisform.release

else

do form c:\资产管理系统\forms\xiugaimima(error1)

thisform.release

endif

在运行中系统提示“非字符表达式”，错误的代码行为：do mima.mm==alltrim(thisform.te2.value) 请问这行代码怎么写？如果整个思路都是错的，请给予思路或代码，谢谢！

set path to c:\资产管理系统\data\ use mima locate for mima.mm=alltrim(thisform.te1.value) if !end() if alltrim(thisform.te2.value)==alltrim(thisform.te3.value) replace mima.mm with alltrim(thisform.te2.value) thisform.release else do form c:\资产管理系统\forms\xiugaimima(error1) thisform.release endif else =messagebox("原始密码不对",16,"密码修改") do form c:\资产管理系统\forms\xiugaimima(error1) thisform.release endif

我把我原来的代码改成如下就成功了，谢谢！

set path to c:\资产管理系统\data\

use mima

if alltrim(thisform.te1.value)==mima.mm and alltrim(thisform.te2.value)==alltrim(thisform.te2.value)

replace mima.mm with alltrim(thisform.te2.value) thisform.release

else

do form c:\资产管理系统\forms\xiugaimima(error1)

thisform.release

endif