| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1018 人关注过本帖
标题:新手请教:姓名密码登录系统
取消只看楼主 加入收藏
娉婷茗子
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2010-6-5
结帖率:100%
收藏
已结贴  问题点数:10 回复次数:3 
新手请教:姓名密码登录系统
输入三次,就无权输入。
下面是我编的程序。
我想问一下,大方向上好像没有什么问题,只是,输入表中的任何一个姓名,任何一个密码,都会显示登陆成功是怎么回事?为什么姓名与密码不能一一对应呢?求高手解答啊!
use 表1
set exact on
locate for 姓名=thisform.text1.value
if empty(thisform.text1.value)
messagebox("请输入姓名")
thisform.text1.setfocus
else
locate for 密码=thisform.text2.value
if empty(thisform.text2.value)
messagebox("请输入密码")
thisform.text2.setfocus
else
if found()
messagebox("登录成功")
wait window"将进入系统!"timeout 2
thisform.release
else
i=i+1
if i<3
messagebox("密码错误,请重新输入")
thisform.text2.value=""
thisform.text2.setfocus
else
messagebox("您已经无权输入密码")
thisform.release
endif
endif
endif
endif
搜索更多相关主题的帖子: 密码 系统 姓名 
2010-06-05 18:12
娉婷茗子
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2010-6-5
收藏
得分:0 
恩,谢谢了。我感觉也是因为locate for的问题,可是不知道该怎么改,我去试试啦,再次感谢
2010-06-05 19:31
娉婷茗子
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2010-6-5
收藏
得分:0 
回复 4楼 hu9jj
那不对的话该怎么提示呢?
2010-06-05 20:41
娉婷茗子
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2010-6-5
收藏
得分:0 
回复 3楼 娉婷茗子
我成功了,谢谢你,呵呵。
对了,还有一个问题,老师告诉我这个应该设计成嵌套的,我看您这个一开始好像也不是嵌套的,怎么不是连续显呢?难道是因为有renturn?
2010-06-05 20:43
快速回复:新手请教:姓名密码登录系统
数据加载中...
 
   



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

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