标题:大家帮我看下这段代码哪错?为什么提示此属性的数据类型无效?
取消只看楼主
bxyt
Rank: 1
等 级:新手上路
帖 子:8
专家分:8
注 册:2010-5-27
结帖率:100%
已结贴  问题点数:10 回复次数:0 
大家帮我看下这段代码哪错?为什么提示此属性的数据类型无效?
DM=alltrim(thisform.text1.value)
DM=alltrim(thisform.text2.value)
select 管理员
locate for 登录名==DM
if ! found()
thisform.N=thisform.N+1
if thisform.n<3
messagebox("无此用户或登录名错误,请请重新输入!")
thisform.text1.setfocus
endif
ELSE

if ! alltrim(口令)==KL
thisform.N=thisform.N+1
if thisform.N<3
messagebox("口令错误,请重新输入!")
thisform.text2.setfocus
endif
else
messagebox("欢迎您使用学籍管理系统!")
do form 维护
thisform.release
ENDIF
ENDIF

if thisform.N=3
messagebox("你无权使用本系统,请退出!")
this.enabled=.F.
endif
搜索更多相关主题的帖子: 属性 类型 提示 数据 代码 
2010-06-11 22:46



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




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

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