| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1007 人关注过本帖
标题:[求助]关于表单的命令!
只看楼主 加入收藏
高处不胜寒※
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-12-19
收藏
 问题点数:0 回复次数:4 
[求助]关于表单的命令!
各位大侠好,我是小虾..
想在一个表单里添加一个命令.

要求是:
当用户的"下拉框"选择一个用户名后,
如果密码"文本框"里的内容是与用户名对应的密码,(用户名和密码都在"用户表格"里)
那么点击"命令按钮""登陆系统"后进入表单2,如果不对,则返回表单1并提示"密码错误"

如果点击"推出系统""命令按钮"那么返回windows系统.

请问命令应该怎么编辑..跪求!@

大学时没有好好学,现在急用时又不会#
搜索更多相关主题的帖子: 表单 命令 
2005-12-19 17:23
fown
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:58
帖 子:1229
专家分:171
注 册:2005-5-26
收藏
得分:0 
我以前回过一个贴子,里面有我的源代码你去找找吧

有人说VFP不行了,我想说,你连VFP十分之一的功能都不会用,你怎么知道VFP不行?本人拒绝回答学生的问题我回答问题一般情况下只提供思路不提供代码,请理解
2005-12-19 20:46
高处不胜寒※
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-12-19
收藏
得分:0 
以下是引用fown在2005-12-19 20:46:00的发言:
我以前回过一个贴子,里面有我的源代码你去找找吧

谢谢斑竹先,不过你的回复有点难找吧..如果是你发的帖子也许要好一点..


DO NOW DO BEST!
2005-12-20 10:32
青春无悔
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2005-12-17
收藏
得分:0 
我就拿我做的一个表单给你举例来说一下吧.我用的是两个文本框不过也着不多,你要是还不明白的话,在上边写出来,我日后给你解决.
这是登录的语句
if empty(thisform.text1.value)
messagebox("请输入用户名!",48,"提示")
thisform.text1.value=""
thisform.text2.value=""
thisform.text1.setfocus
else
if empty(thisform.text2.value)
messagebox("请输入密码",48,"提示")
thisform.text2.setfocus
else
use 表名
locate for 用户名=alltrim(thisform.text1.value)
if found()
if 密码=alltrim(thisform.text2.value)
use
do form main2.scx
thisform.release
else
messagebox("密码错误,请重新输入!",48,"提示")
thisform.text2.value=""
thisform.text2.setfocus
endif
else
messagebox("用户名无效,请输入有效的用户名!",48,"提示")
thisform.text2.value=""
thisform.text1.value=""
thisform.text2.setfocus
endif
endif
退出按钮的语句是 THISFORM.RELEASE
不过不要忘了在表单的UNLOAD属性中加入 CLEAR EVENTS


2005-12-20 19:43
高处不胜寒※
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-12-19
收藏
得分:0 
谢谢....

DO NOW DO BEST!
2005-12-21 09:50
快速回复:[求助]关于表单的命令!
数据加载中...
 
   



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

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