标题:vfp 密码修改 求救!
取消只看楼主
Loud349
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2004-12-3
 问题点数:0 回复次数:2 
vfp 密码修改 求救!

我是一个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) 请问这行代码怎么写?如果整个思路都是错的,请给予思路或代码,谢谢!

搜索更多相关主题的帖子: vfp 密码 
2004-12-03 16:03
Loud349
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2004-12-3
得分:0 
谢谢高手指点!

2004-12-03 16:36
Loud349
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2004-12-3
得分:0 

我把我原来的代码改成如下就成功了,谢谢!

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


2004-12-03 20:33



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




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

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