| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 751 人关注过本帖
标题:这样一个功能如何实现?
只看楼主 加入收藏
tcsoftware
Rank: 1
等 级:新手上路
帖 子:54
专家分:0
注 册:2005-8-6
收藏
 问题点数:0 回复次数:5 
这样一个功能如何实现?
一个文本框,一个按钮,按钮功能是查询文本框中输入的值是否已存在在一个表中
谢谢
搜索更多相关主题的帖子: 文本框 
2005-12-14 16:55
fown
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:58
帖 子:1229
专家分:171
注 册:2005-5-26
收藏
得分:0 
1\可以建立索引,用SEEK查找
2\可以用SQL
3\可以用LOCA

有人说VFP不行了,我想说,你连VFP十分之一的功能都不会用,你怎么知道VFP不行?本人拒绝回答学生的问题我回答问题一般情况下只提供思路不提供代码,请理解
2005-12-15 19:06
tcsoftware
Rank: 1
等 级:新手上路
帖 子:54
专家分:0
注 册:2005-8-6
收藏
得分:0 
谢谢了,不过SQL语言我真的不是很好,呵呵

小郭小郭我爱你排山倒海支持你小六小六我爱你七舅姥爷支持你人见人爱白展堂重情重义好儿郎湘玉湘玉如花似玉
2005-12-16 10:17
青春无悔
Rank: 1
等 级:新手上路
帖 子:28
专家分:0
注 册:2005-12-17
收藏
得分:0 
我在这里给你举一个具体的例子吧,比如说是要注册用户吧,原来已有的用户就不能用了,这样的话我要检查一下,你输入的用户是不是存在.
if thisform.command1.caption="注册"
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.value=""
thisform.text2.setfocus
else
use user123
locate for 用户名=alltrim(thisform.text1.value)
if found()
messagebox("该用户已存在,请用别的用户名!",48,"提示")
thisform.text1.value=""
thisform.text2.value=""
thisform.text1.setfocus
else
append blank
replace 用户名 with thisform.text1.value
replace 密码 with thisform.text2.value
messagebox("用户注册成功",48,"提示")
thisform.command1.caption="继续注册"
thisform.command2.caption="退出"
endif
use
endif
endif
else
thisform.text1.value=""
thisform.text2.value=""
thisform.text1.setfocus
thisform.command1.caption="注册"
thisform.command2.caption="取消"
endif
thisform.refresh

2005-12-22 09:38
liyuanfu
Rank: 1
等 级:新手上路
帖 子:106
专家分:0
注 册:2005-12-8
收藏
得分:0 

楼上的,论坛精神值得佩服。

将use 改为sele 更好一点。

[此贴子已经被作者于2005-12-22 14:55:58编辑过]


2005-12-22 14:54
a_bel
Rank: 1
来 自:China
等 级:新手上路
威 望:2
帖 子:24
专家分:9
注 册:2006-2-28
收藏
得分:0 
请教:楼上的大哥,为什么将use 改为sele较好呢?
2006-03-15 15:42
快速回复:这样一个功能如何实现?
数据加载中...
 
   



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

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